Discussion :

[damienlelol]

Bonjour,
Je veux construire un tableau dynamique en vba d'après une feuille de donnée.

procédure classique pour définir la dernière ligne de mon tableau vba :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim lastRow As Integer
lastRow = Range("A1").End(x1Down).Row

Quand je compile, le message : " Erreur d'exécution '1004':
Erreur définie par l'application ou pas l'objet"
et le débugger surligne la ligne ci-dessus.

En fait mon fichier excel est constitué de plusieurs petits tableaux séparés d'une ligne blanche à chaque fois, je me dis que le End(x1Down) s'arrête à chaque fois qu'il y a une ligne vide, et que ça bug pour cette raison.
Qu'en pensez-vous ?

Merci de votre aide !

[issoram]

Bonjour,

Je penche pour la faute de frappe:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim lastRow As Integer
lastRow = Range("A1").End(xlDown).Row  'et non pas x1Down

Attention aussi si tu es dans une version d'Excel >=2007, il te faudra prévoir un type Long pour ta variable lastRow, sinon tu risques de rencontrer une erreur pour dépassement de capacité (nb lignes >65536)

[Invité]

http://www.developpez.net/forums/d14...t/#post7766805