Dernière ligne d'un Range
Résolu
touroul
Messages postés
520
Date d'inscription
Statut
Membre
Dernière intervention
-
touroul Messages postés 520 Date d'inscription Statut Membre Dernière intervention -
touroul Messages postés 520 Date d'inscription Statut Membre Dernière intervention -
Bonjour le forum !
Je ne parviens pas à comprendre l'erreur que je fais et je m'adresse à vous.
Je cherche à définir une variable Lig correspondant à la première cellule vide d'un RANGE.
Ma macro semble ne rien trouver.
Dans d'autres essais sans With, j'obtiens "variable objet ou variable de bloc with non définie".
Un classeur d'exemple : https://www.cjoint.com/c/JKhkYPSMNVn
Puis-je solliciter votre aide svp ?
Merci par avance
Je ne parviens pas à comprendre l'erreur que je fais et je m'adresse à vous.
Je cherche à définir une variable Lig correspondant à la première cellule vide d'un RANGE.
Ma macro semble ne rien trouver.
Dans d'autres essais sans With, j'obtiens "variable objet ou variable de bloc with non définie".
Un classeur d'exemple : https://www.cjoint.com/c/JKhkYPSMNVn
Sub DerligRange()
Dim Lig As Range
If Not Lig Is Nothing Then
Lig = Range("C2:C9").Find("*", , , , xlByColumns, xlPrevious).Row + 1
MsgBox (Lig)
Else
MsgBox "Rien"
End If
End Sub
Puis-je solliciter votre aide svp ?
Merci par avance
Configuration: Windows / Firefox 82.0
2 réponses
-
Bonjour,
voir ceci:
https://forums.commentcamarche.net/forum/affich-37622001-vba-detection-de-cellule-vide-ligne-colonnne
ce qui donne ceci:
Sub DerligRange() Dim Lig As Long Lig = 1 'première ligne à vérifier Do While Not IsEmpty(Range("C" & Lig)) Lig = Lig + 1 Loop MsgBox "La première ligne vide colonne C est la ligne : " & Lig End Sub
Voilà
-
Bonjour Monsieur
Merci beaucoup pour votre aide.
Ça fonctionne ainsi.
Dommage que je ne sois pas tombé sur ce post plus tôt.
Très bonne journée !
