VBA : Sélectionner la dernière cellule non vide

Numéro d'article: 463027 - Voir les produits auxquels s'applique cet article
Ancien nº de publication de cet article : F13027
Agrandir tout | Réduire tout

Symptômes


Utilisant Visual Basic pour Excel, je souhaite sélectionner la dernière
cellule renseignée dans une colonne ou une ligne donnée (la colonne ou la
ligne spécifiée peuvent contenir des cellules vides).

Comment dois-je procéder ?


Résolution


Il suffit d'utiliser la méthode Fin (End, en anglais) à partir de la
dernière colonne (256 ème) ou ligne (16384 ème) d'une feuille de calcul,
puis si vous recherchez la dernière cellule dans une :

- ligne, de se décaler vers la gauche.
- colonne, de se décaler vers le haut.


EXEMPLE :

#########################################################################
' Code Visual Basic français
Proc test()
' Sélectionne la dernière cellule non vide de la 2 ème colonne
Cellules(16384; 2).Fin(xlVersHaut).Sélectionner
' Sélectionne la dernière cellule non vide de la 3 ème ligne
Cellules(256; 3).Fin(xlVersGauche).Sélectionner
Fin Proc
' Code Visual Basic anglais
Sub test()
' Sélectionne la dernière cellule non vide de la 2 ème colonne
Cells(16384, 2).End(xlUp).Select
' Sélectionne la dernière cellule non vide de la 3 ème ligne
Cells(3, 256).End(xlLeft).Select
End Sub
#########################################################################

Propriétés

Numéro d'article: 463027 - Dernière mise à jour: mardi 23 août 2005 - Version: 1.3
Les informations contenues dans cet article s'appliquent au(x) produit(s) suivant(s):
  • Microsoft Excel 5.0 pour Macintosh
  • Microsoft Visual Basic pour Applications 1.0
  • Microsoft Excel 95 Standard
  • Microsoft Excel 5.0 Standard
  • Microsoft Excel 5.0 Standard
  • Microsoft Excel 5.0c
Mots-clés : 
vba KB463027
L'INFORMATION CONTENUE DANS CE DOCUMENT EST FOURNIE PAR MICROSOFT SANS GARANTIE D'AUCUNE SORTE, EXPLICITE OU IMPLICITE. L'UTILISATEUR ASSUME LE RISQUE DE L'UTILISATION DU CONTENU DE CE DOCUMENT. CE DOCUMENT NE PEUT ETRE REVENDU OU CEDE EN ECHANGE D'UN QUELCONQUE PROFIT.
Exclusion de responsabilité concernant les contenus obsolètes dans la Base de connaissances
Cet article concerne des produits pour lesquels Microsoft n'offre plus de support. Il est par conséquent fourni « en l'état » et ne sera plus mis à jour.

Envoyer des commentaires

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com