Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Boucle for vba

vinciHorus

XLDnaute Junior
bonjour

j'aimerai une vérification si la cellule est vide on arrêter la boucle.

Merci !!

bout de code for:

Sub rtrt()

Dim Lig As Long
Dim t As Long

t = Selection.Row
Lig = Worksheets("Saisie").Range("A65536").End(xlUp).Row

With Worksheets("Saisie")

For i = t To Lig

.Range("B" & i) = Application.VLookup(.Range("E" & i), Worksheets("BD_REG_NAT").Range("A:V"), 22, False) 'Formule de recherche
Range("C" & i).Select
Call Réf_noms_statuts(Cells(ActiveCell.Row, 5).Value)

Next i


End With

End Sub
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…