Selection plage variable via VBA

Le
Domi
Bonjour à tous,

J'utilise cette ligne de code pour sélectionner et nommer une plage comprise
entre les colonnes B et F qui commence à la ligne 11 et se termine à la
dernière valeur trouvée dans la colonne A.

Range("F11:B" & Range("A65000").End(xlUp).Row).Name = "Data"

Comment modifier ce code pour que la ligne de fin ne soit pas la dernière
valeur de la colonne A mais la dernière ligne occupée par une valeur quelle
que soit la colonne ?

Merci pour votre aide ;o)
Domi
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel.C
Le #21477471
Bonjour.
Range("F11:B" & Cells.Find("*", [A65536], , , _
xlByRows, xlPrevious).Row).Name = "Data"
Cette méthode prend la ligne de la dernière cellule non vide, même si
celle-ci est en dehors de la plage B:F.
Cordialement.
Daniel

Bonjour à tous,

J'utilise cette ligne de code pour sélectionner et nommer une plage comprise
entre les colonnes B et F qui commence à la ligne 11 et se termine à la
dernière valeur trouvée dans la colonne A.

Range("F11:B" & Range("A65000").End(xlUp).Row).Name = "Data"

Comment modifier ce code pour que la ligne de fin ne soit pas la dernière
valeur de la colonne A mais la dernière ligne occupée par une valeur quelle
que soit la colonne ?

Merci pour votre aide ;o)
Domi
michdenis
Le #21477461
Bonjour,

Tu adaptes le nom de la feuille.

'-----------------------------------------
Sub test()

Dim DerLig As Long
With Worksheets("Feuil1")
DerLig = .Range("B:F").Find(What:="*", _
LookIn:=xlFormulas, _
SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row
.Range("B11:F" & DerLig).Name = "Data"
End With
End Sub
'-----------------------------------------


"Domi"
Bonjour à tous,

J'utilise cette ligne de code pour sélectionner et nommer une plage comprise
entre les colonnes B et F qui commence à la ligne 11 et se termine à la
dernière valeur trouvée dans la colonne A.

Range("F11:B" & Range("A65000").End(xlUp).Row).Name = "Data"

Comment modifier ce code pour que la ligne de fin ne soit pas la dernière
valeur de la colonne A mais la dernière ligne occupée par une valeur quelle
que soit la colonne ?

Merci pour votre aide ;o)
Domi
Publicité
Poster une réponse
Anonyme