Erreur synthaxe Range

relo

XLDnaute Nouveau
Bonjour,
Je cherche à insérer plusieurs tableau les uns à la suite des autres, pour cela je récupère l'adresse de la dernière ligne vide pour insérer un nouveau tableau en dessous.
J'insère donc une adresse dans un Range mais lorsque j'exécute mon code j'ai une erreur de type " Référence incorrecte ou non qualifiée"
Voici mon code :
ActiveSheet.ListObjects.Add(xlSrcRange, Range("A1048576" & .End(xlUp).Address & ":Q1048576" & .End(xlUp).Address), , xlNo).Name = "Tableau1"

J'ai essayé également en remplaçant les adresse par des variable telle que :
DerCell1 = Range("A1048576").End(xlUp).Address
DerCell2 = Range("Q1048576").End(xlUp).Address
ActiveSheet.ListObjects.Add(xlSrcRange, Range("DerCell1 :DerCell2"), , xlNo).Name = "Tableau1"

Mais cela ne fonctionne pas non plus..

Merci d'avance :)
 

Discussions similaires

Réponses
39
Affichages
4 K

Statistiques des forums

Discussions
311 725
Messages
2 081 940
Membres
101 845
dernier inscrit
annesof