Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

trouver le numéro de la dernière ligne d'une plage ou adresse

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion calabok
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
C

calabok

Guest
Bonjour à tous,

comment extraire le numéro de la dernière ligne d'une plage du genre

MaFeuilleSet.Cells(65536, 1).End(xlUp).CurrentRegion

ou dans une adresse

MonAdress = MaFeuilleSet.Cells(65536, 1).End(xlUp).CurrentRegion.Address

MonAdress renvoi : "$A$3:$FG$221"
ici la dernière ligne est 221

j'ai trouvé en moyen empirique qui est de chercher la 1 er occurrence de $ depuis la droite et de prendre les chiffres à gauche une fois trouvé.

Merci
 
Trier par date Trier par votes
Re : trouver le numéro de la dernière ligne d'une plage ou adresse

Bonjour calabok, bienvenue sur XLD,

Pas sûr que l'utilisation de CurrentRegion soit la meilleure chose, mais c'est vous qui décidez.

Voyez cette macro :

Code: 
Sub test()
Dim plage As Range, MonAdress As String

Set plage = MaFeuilleSet.Cells(65536, 1).End(xlUp).CurrentRegion
MsgBox [COLOR="Red"]plage.Row + plage.Rows.Count - 1[/COLOR]

MonAdress = MaFeuilleSet.Cells(65536, 1).End(xlUp).CurrentRegion.Address
MsgBox [COLOR="red"]Mid(MonAdress, InStrRev(MonAdress, "$") + 1, 7)[/COLOR]

End Sub

A+
 
Vote positif 0 Vote négatif
Re : trouver le numéro de la dernière ligne d'une plage ou adresse

Bonjour


Je partage l'avis de Job (que je salue au passage)

et voici pour s'amuser avec VBA en ce dimanche pluvieux.

VB: 
Sub a()
Dim x As Range, m_ess$
Set x = Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious)
m_ess = "Valeur : " & x & vbLf
m_ess = m_ess & "Adresse : " & x.Address(0, 0) & vbLf
m_ess = m_ess & "Ligne : " & x.Row & vbLf
m_ess = m_ess & "Colonne : " & x.Column & vbLf
m_ess = m_ess & "Lettre : " & Split(x.Address, "$")(1)
MsgBox m_ess, vbInformation, "La dernière cellule, comme dirait le Grand Eddy ;-)"
End Sub
 
Vote positif 0 Vote négatif
Re : trouver le numéro de la dernière ligne d'une plage ou adresse

Merci pour l'aide cela marche.

J'utilise la fonction CurrentRegion pour être sur de prendre la ligne même si la cellule choisie est vide, mais apparemment il y a des méthodes plus simples.

Merci encore.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

G
  • Résolu(e)
XL 2016 Pb de tri et sous totaux
2
Réponses
27
Affichages
2 K
Gestionnaire_rh
G
C
  • Résolu(e)
Microsoft 365 Trouver résultat en fonction de la dernière ligne d'une colonne
Réponses
7
Affichages
562
Chounoé
C
D
  • Résolu(e)
Microsoft 365 Graphique avec plage de données glissante en partant d'une date
Réponses
5
Affichages
1 K
Dégé59
D
  • Résolu(e)
XL 2016 En VBA, Automatiser la réponse en fonction de l'état d'une cellule.
Réponses
7
Affichages
870
piga25
I
  • Question Question
XL 2019 (RESOLU) Date de dernière modification d'une plage de cellule
Réponses
3
Affichages
1 K
patricktoulon
  • Résolu(e)
XL 2021 supprimer les lignes vides de la ligne 8 à la dernière ligne vide
2
Réponses
20
Affichages
2 K
bsalv
B
POWERQUERY :: Récupérer le contenu d'un champ nommé (une cellule) ou le contenu d'une plage (range de plusieurs cellules)
Réponses
0
Affichages
811
oguruma
P
  • Résolu(e)
XL 2019 afficher le numéro de ligne de la dernière valeur différente de zéro
2
Réponses
23
Affichages
2 K
pat66
P
M
  • Question Question
XL 2010 Calcul possible dans la zone de liste pour le débit et le crédit lors d'une recherche basée sur la zone de texte
Réponses
0
Affichages
922
Mody200
M
L
  • Question Question
Microsoft 365 Report de valeur d'une cellule dans une autre cellule en fonction de la dernière cellule non vide d'une ligne
Réponses
1
Affichages
1 K
sylvanu
Z
  • Question Question
XL 2021 VBA Prélèvement d'une donnée si une valeur recherchée est identique
Réponses
3
Affichages
650
ZiM
Z
K
  • Résolu(e)
XL 2019 Copie de la dernière ligne avec la mise en forme et formules
Réponses
6
Affichages
931
Kev1407
K
C
  • Question Question
Microsoft 365 Extraire le numéro de la première et de la dernière colonne qui contient une données
Réponses
4
Affichages
984
mapomme
T
  • Question Question
XL 2019 VBA: Effacer le contenu de plages de cellules avec critères
Réponses
5
Affichages
2 K
tiitii60
T
R
  • Question Question
Microsoft 365 VBA - rechercher une ligne en fonction de 2 critères sur 2 colonnes différentes
Réponses
9
Affichages
2 K
sylvanu
R
  • Résolu(e)
XL 2010 vba : extraction du n°de la dernière ligne dans un tcd
Réponses
2
Affichages
899
Raynaud.JF
R
S
  • Résolu(e)
Microsoft 365 Effacer le contenu de cellule sur la même ligne d'une autre feuille
Réponses
6
Affichages
1 K
Robert
G
  • Résolu(e)
XL 2016 Définir Boucle pour afficher plusieurs tableaux dans des textbox sur une userform (ou sur une feuille Excel)
Réponses
6
Affichages
2 K
gaby.jvx
G
  • Question Question
XL 2013 Fonction pour trouver la dernière ligne
Réponses
11
Affichages
2 K
job75
T
  • Résolu(e)
XL 2016 Erreur d'exécution 9 - L'indice n'appartient pas à la sélection (recherche de la dernière ligne vide d'une feuille)
Réponses
7
Affichages
2 K
tdo88
T
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…