Je patauge sur le positionnement dans ma base (VBA)

Signaler
Messages postés
5
Date d'inscription
jeudi 18 février 2021
Statut
Membre
Dernière intervention
2 avril 2021
-
Messages postés
5
Date d'inscription
jeudi 18 février 2021
Statut
Membre
Dernière intervention
2 avril 2021
-
Bonjour,
Je patauge.
Je souhaite écrire des valeurs dans une base après avoir trouvé la bonne ligne.
Je n'arrive pas à trouver et me positionner sur la bonne ligne
Voilà ce que j'ai écrit :
'**************************************************************************************************
'Récupération des données pour les enregistrer dans BDevis
Range("O7").Select
HT = ActiveCell.Value
Range("O8").Select
TVA5 = ActiveCell.Value
Range("O9").Select
TVA10 = ActiveCell.Value
Range("O10").Select
TVA20 = ActiveCell.Value
Range("O13").Select
Devis = ActiveCell.Value

'****************************************************************************************************
'Ouverture de la feuille BDevis
Sheets("BDevis").Select

'Se placer sur la cellule
Dim cel As Range
Set cel = Cells.Find(what:="Devis", lookat:=xlWhole)

'Enregistrement des valeurs du devis
ActiveCell.Offset(0, 20).Value = HT
ActiveCell.Offset(0, 21).Value = TVA5
ActiveCell.Offset(0, 22).Value = TVA10
ActiveCell.Offset(0, 23).Value = TVA20

Merci de votre aide

1 réponse

Messages postés
23989
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
8 avril 2021
6 718
Bonjour,

ici il t'avait été demandé un fichier que tu n'as jamais fourni : https://forums.commentcamarche.net/forum/affich-37099203-recuperer-sous-vba-une-valeur-modifier-et-ecrire-dans-un-champ
eric

En essayant continuellement, on finit par réussir. 
Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
Messages postés
5
Date d'inscription
jeudi 18 février 2021
Statut
Membre
Dernière intervention
2 avril 2021

Bonjour Eriiic

J'ai réussi avec l'explication et j'ai cru envoyer le fichier qui fonctionnait.

Ma nouvelle question est :
Je choisi une valeur
Je la cherche
Je me positionne sur cette valeur (cellule)
Je me déplace de x colonnes pour y inscrire mes nouvelles données.

Si tu as besoin du fichier, j'ai gardé la procédure et je peux la joindre
Merci de ton aide.