Syntaxe dérnière ligne d'une selection

Fermé
heisenberg007 Messages postés 10 Date d'inscription mercredi 21 novembre 2012 Statut Membre Dernière intervention 17 novembre 2015 - 17 nov. 2015 à 12:43
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 19 nov. 2015 à 08:35
Bonjour,

Je cherche à trouver la bonne syntaxe pour aller chercher toutes les données jusqu'à la dernière ligne et non plus une sélection prédéfinie.

 
ThisWorkbook.Names.Add "Plage", _
RefersTo:="='" & Chemin & "[" & fichier & "]Feuil1'!$A$2:$J$50"



A voir également:

1 réponse

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
19 nov. 2015 à 08:35
Bonjour,

Essaie ceci :
Dim maLigne As Long 
'remplacer éventuellement "A" par "J" :
maLigne = Range("A" & Rows.Count).End(xlUp).Row
ThisWorkbook.Names.Add "Plage", _
   RefersTo:="='" & Chemin & "[" & fichier & "]Feuil1'!$A$2:$J$" & maLigne


0