Besoin d'aide avec la fonction Find + collé VBA [Résolu]

grutz 10 Messages postés mercredi 3 février 2016Date d'inscription 8 février 2017 Dernière intervention - 8 févr. 2017 à 10:01 - Dernière réponse : grutz 10 Messages postés mercredi 3 février 2016Date d'inscription 8 février 2017 Dernière intervention
- 8 févr. 2017 à 12:57
Bonjour, j'ai besoin de votre aide pour une manipulation VBA.

je voudrais trouver dans le classeur en colonne A, la valeur 1654B . si c'est vrai, alors je voudrais coller un texte "B8" sur la même ligne que la valeur trouvé en colonne F.

est ce possible ?

merci, cordialement
Afficher la suite 

5 réponses

Répondre au sujet
ThauTheme 4338 Messages postés mardi 21 octobre 2014Date d'inscription 6 septembre 2017 Dernière intervention - 8 févr. 2017 à 10:36
0
Utile
1
Bonjour Grutz, bonjour le forum,

Essaie comme ça :
Dim O As Worksheet
Dim R As Range

Set O = Worksheets("Feuil1") 'à adapter
Set R = O.Columns(1).Find("1654B", , xlValues, xlWhole)
If Not R Is Nothing Then R.Offset(0, 1).Value = "B8"


pijaku 12206 Messages postés jeudi 15 mai 2008Date d'inscriptionModérateurStatut 13 septembre 2017 Dernière intervention - 8 févr. 2017 à 10:47
Salut ThauTheme,

Offset(0, 5)

non?
Commenter la réponse de ThauTheme
ThauTheme 4338 Messages postés mardi 21 octobre 2014Date d'inscription 6 septembre 2017 Dernière intervention - 8 févr. 2017 à 10:56
0
Utile
1
Bonjour Pijaku,

Bien sûr ! Je l'ai fait exprès tu penses bien... C'était juste pour voir si tu suivais...

(Merci, c'est bon de savoir qu'il y a des yeux attentifs prêts a reprendre nos erreurs).
pijaku 12206 Messages postés jeudi 15 mai 2008Date d'inscriptionModérateurStatut 13 septembre 2017 Dernière intervention - 8 févr. 2017 à 10:59
En même temps, je n'aurais pas du le signaler.
Cela permet à l'utilisateur de bien assimiler le comment du pourquoi de comment fonctionne le Offset.
Mais bon... ça reste élémentaire.
Commenter la réponse de ThauTheme
grutz 10 Messages postés mercredi 3 février 2016Date d'inscription 8 février 2017 Dernière intervention - Modifié par grutz le 8/02/2017 à 12:57
0
Utile
Merci beaucoup, ça fonctionne très bien.
j'ai pu l'adapter à ma situation.
;)
Commenter la réponse de grutz