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
A voir également:
- Syntaxe objet range
- Vente objet occasion entre particulier - Guide
- Trouver objet avec photo - Guide
- Objet interdit en cabine ryanair - Guide
- Vba range avec variable ✓ - Forum VB / VBA
- Mesurer un objet - Guide
2 réponses
Salut,
c'est plutôt
Un autre façon de le faire
Ca marche aussi comme ça
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