Besoin d'aide avec la fonction Find + collé VBA

Résolu
grutz Messages postés 26 Statut Membre -  
grutz Messages postés 26 Statut Membre -
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

3 réponses

  1. ThauTheme Messages postés 1564 Statut Membre 160
     
    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"


    0
    1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      Salut ThauTheme,

      Offset(0, 5)

      non?
      0
  2. ThauTheme Messages postés 1564 Statut Membre 160
     
    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).
    0
    1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      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.
      0
  3. grutz Messages postés 26 Statut Membre
     
    Merci beaucoup, ça fonctionne très bien.
    j'ai pu l'adapter à ma situation.
    ;)
    0