Erreur code besoin correction

  • Initiateur de la discussion Initiateur de la discussion BIGOKOU
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

B

BIGOKOU

Guest
bonjour lorsque je lance ce code le debut fonctionne mais à la fin ca bloque a ce niveau la

For n = 2 To Range("A" & Rows.Count).End(xlUp).Row
Set c = Sheets(Fich).Columns(1).Find(Range("A" & n), LookIn:=xlValues, lookat:=xlWhole)
If Not c Is Nothing Then
firstAddress = c.Address
Do
Range("N" & n) = "OK"
Set c = Sheets(Fich).Columns(1).FindNext(c)

la

Loop While Not c Is Nothing And c.Address <> firstAddress End IfNext
 
Re : Erreur code besoin correction

Bonjour Bigokou, bonjour le forum,

Essaie comme ça :
Code:
For n = 2 To Range("A" & Rows.Count).End(xlUp).Row
    Set c = Sheets(Fich).Columns(1).Find(Range("A" & n), LookIn:=xlValues, lookat:=xlWhole)
    If Not c Is Nothing Then
        firstAddress = c.Address
        Do
            Range("N" & n) = "OK"
            Set c = Sheets(Fich).Columns(1).FindNext(c)
        Loop While Not c Is Nothing And c.Address <> firstAddress
    End If
Next
 
Re : Erreur code besoin correction

Bonjour Bigokou, bonjour le forum,

Oui c'est presque la même chose car dans ta dernière ligne à toi il y avait tout : la ligne, le End If et le Next. Je pensais que ton erreur venais de là... Mais visiblement j'avais mal pensé (I'm very sorry mais moi j'ai pris au moins la peine de l'écrire correctement).
Sinon, ton code semble correct mais pour savoir pourquoi il plante il faudrait le fichier qui va avec...
 
Dernière édition:
Re : Erreur code besoin correction

ok je te joins le fichier mais il a un soucis je voudrais changer l ordre des recherche et je voudrais que la recherche parte de l onglet fev2012 vers global
 
Dernière modification par un modérateur:
Re : Erreur code besoin correction

Bonjour Bogokou, bonjour le forum,

Il n'y a aucun code dans le fichier que tu envoies ! Et je n'ai pas ta version d'excel... Mais pour moi ce n'est plus la peine de le convertir pour Excel 2003 car je préfère abandonner... Je ne comprends pas que l'on demande de l'aide et que l'on soit pas capable de fournir le minimum pour obtenir cette aide...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
4
Affichages
520
Réponses
2
Affichages
410
Réponses
4
Affichages
754
Retour