Formule de selection VBA

Bonjour à Tous et à Toutes,

j aimerai svp utiliser la formule VBA se terminant par (.Rows.Count, 1).End(xlUp).Row pour sélectionner les elements d'une colonne, vous trouverez le fichier exemple en pièce jointe,utiliser cette formule pour sélectionner la cellule A3 à A6627

Merci

7sel.xlsb (394.14 Ko)

Bonjour,

Voilà la ligne de code nécessaire

Range("A3:A" & Range("A" & Rows.Count).End(xlUp).Row).Select

Cordialement

5sel.xlsb (399.54 Ko)

Bonjour,

Voilà la ligne de code nécessaire

Range("A3:A" & Range("A" & Rows.Count).End(xlUp).Row).Select

Cordialement

Bonjour et Merci pour la rapidité de ta réaction

De rien, ce n'était pas compliqué...

Bonne continuation !

Bonjour

Exemple

Sub test()
  Dim derniereLigne As Long
  derniereLigne = Feuil1.Range("A" & Rows.Count).End(xlUp).Row 'n° de la dernière ligne non vide de la colonne A
  Feuil1.Range("A3:A" & derniereLigne).Select
End Sub

Bonjour,

un exemple :

Public Sub XXX()
Dim n As Long, rng As Range
    With ActiveSheet
        n = .Cells(.Rows.Count, 1).End(xlUp).Row
        .Cells(3, 1).Resize(n - 2).Select
    End With
End Sub

Bonjour,

un exemple :

Public Sub XXX()
Dim n As Long, rng As Range
    With ActiveSheet
        n = .Cells(.Rows.Count, 1).End(xlUp).Row
        .Cells(3, 1).Resize(n - 2).Select
    End With
End Sub

Merci Jean Eric

Bonjour

Exemple

Sub test()
  Dim derniereLigne As Long
  derniereLigne = Feuil1.Range("A" & Rows.Count).End(xlUp).Row 'n° de la dernière ligne non vide de la colonne A
  Feuil1.Range("A3:A" & derniereLigne).Select
End Sub

Merci M12

Rechercher des sujets similaires à "formule selection vba"