syntaxe objet range

Question

bonjour

Je débute en VBA Excel et je ne sais plus écrire le code permettant de :
-trouver la dernière ligne non vide d'un tableau (en fait, cela je maîtrise...je pense)
- incrémenter une variable avec le numéro de cette ligne
- utiliser cette variable pour sélectionner une plage

Range("E1").End(xlDown).Offset(0, 0).Select
dernier = ActiveRows
Range("A2", (J" & dernier)).Select

Ce sont les 2 dernières lignes qui me posent problème.

Merci de vos réponses

lami20j · Answer

Salut,

c'est plutôt

 Range("A2:J" & dernier).Select

Un autre façon de le faire

Sub dernierelignenonvide()
    Dim ligne As Long
    
    ligne = Range("A65536").End(xlUp).Row 'je stocke le numéro de ligne 
    Range("b2:j" & ligne).Select ' et je l'utilise avec range
       
End Sub

Ca marche aussi comme ça

Sub dernierelignenonvide_2()

    Range("b2:j" & Range("A65536").End(xlUp).Row + 1).Select

End Sub

berclaud · Answer

Wouahhhhh !!!!Ca c'est de la rapidité et de la qualité !!!Super, cela fonctionne comme je le veux !! OUF !!! Je désespérais.Merci tout plein !

Syntaxe objet range

2 réponses

Discussions similaires

Newsletters