Bonjour à tous
j'ai une boucle qui scrute tous les onglets, comment faire pour en sortir sans sortir de la SUB (exit sub)
Sub recherche()
for i = 1 to 10
For Each ws In Worksheets
If Sheets(ws.Name).Range("A2").Value = "Valeur" Then
sortir de la boucle si valeur trouvé sans scruter la suite des onglets
end if
next ws
next i
end sub
Si j'ai 50 onglets et que la valeur à trouver est dans la 3ème je ne veux pas continuer la recherche dans les autres onglets
merci d'avance
Eric
Sub recherche()
For i = 1 To 10
For Each ws In Worksheets
If Sheets(ws.Name).Range("A2").Value = "Valeur" Then
Exit For 'pour sortir de la boucle for each
'mais restera dans la boucle For i = 1 To 10
End If
Next ws
Next i
End Sub
Sub recherche()
For i = 1 To 10
For Each ws In Worksheets
If Sheets(ws.Name).Range("A2").Value = "Valeur" Then
GoTo fin
End If
Next ws
Next i
fin:
End Sub