|
|
|
|
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
Salut,
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 |
Ajouter 1 élément dans 1 tableau programmation objet c Ecran out of range Instance d'objet Je ne souhaite pas livrer mon objet sur e bay Jeux objet cachee La méthode 'range' de l'objet '_worsheet' a échoué La propriété jours360 de l'objet date en javascript Objet c Objet caché gratuit Quand passer a la quete de rang 6 monster hunter 2 Ranger des données dans l'ordre décroissant sous calc open office Sxs.dll erreur de syntaxe Syntaxe vi Tutorial 3ds max objet Vb 6 : le composant activex ne peut créer l'objet Vba excel 1004 la méthode sort de l'objet range a échoué Vendre objet You have an error in your sql syntax; check the manual that corresponds to your mysql server version for the right syntax to use
