ben ...
T'as pas encore plus simple, comme question ???
Regarde ce que fais ceci :
For i = 1 To 10
If Cells(1, i) <> "" And Cells(1, i + 1) <> "" And Cells(1, i + 2) <> "" Then
MsgBox Cells(i).Address
exit for
End If
Next
et comprends ce que cela fait et pourquoi cela le fait.
C 'est d'un niveau moins que rudimentaire, cette "affaire" !
________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviend