Trouver une cellule selon son contenu

Résolu
Greeegoryyy -  
 Greeegoryyy -
Bonjour,
Je suis en train de réaliser un code qui va me permettre de trouver une cellule dans une plage de cellule, selon sont contenu qui est du texte. J'ai donc utiliser les méthodes With, Set et .Find. Cependant, il me renvoie une erreur mais je ne comprend pas, voici mon code :
With Sheets(Suivi).Range("30:39")
Set Compteur_Demande = .Find(What:="Compteur Demandeur", _
After:=.Cells(1), _
LookIn:=xlFormulas, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False, _
SearchFormat:=False)
End With
Colonne_Compteur_Demande = Compteur_Demande.Column

Je suis à votre disposition s'il vous faut plus d'infos !
Cordialement

1 réponse

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    With Sheets(Suivi).Range("30:39")

    Manque la ou les colonnes
    1
    1. Greeegoryyy
       
      Ah oui je vois, merci beaucoup, bonne journée !
      0
    2. Greeegoryyy
       
      Ca ne marche pas plus finalement, je pensais pourtant que ça arrangerait... Est-ce que ça ne viendrait pas de :
      With Sheets(Suivi).Range("30:39")

      À remplacer en :
      With Worksheets("Suivi").Range("30:39")
      ?
      0
    3. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > Greeegoryyy
       
      Re,
      Oui, pour le nom de la feuille, mais toujours pas de colonne ex:
      With Worksheets("Suivi").Range("A30:Z39")
      0
    4. Greeegoryyy
       
      Très bien merci, il ne m'indique plus d'erreur à ce niveau là !
      0
    5. Greeegoryyy
       
      Et petite question, dois-je déclarer mes variables Compteur_Demande et Colonne_Compteur_Demande ? (cf. dernière ligne du code)
      0