Syntaxe objet range
berclaud
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
berclaud Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
berclaud Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
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
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
2 réponses
-
Salut,
c'est plutôtRange("A2:J" & dernier).Select
Un autre façon de le faireSub 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 çaSub dernierelignenonvide_2() Range("b2:j" & Range("A65536").End(xlUp).Row + 1).Select End Sub -
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 !
