Rows.Count?

[Didier]

Bonjour à tous, pouvez vous m'aider...
Le problème est très simple:
j'ai dans mon code
nbligne = Range(Cells(1, 1), Cells(1, 1).End(xlDown)).Rows.Count
et cela marche sans problème
mais dès que je mets
nbligne = Sheets(1).Range(Cells(1, 1), Cells(1, 1).End(xlDown)).Rows.Count
Il bug et c'est erreur d'execution 1004????
Pourquoi?

Merci d'avance

C'est excel 2000

 

[PascalXLD]

Bonjour

Excuse moi mais je ne vois pas trop l'interet de ton code si compliqué

nbligne = Sheets(1).Range('A1').End(xlDown).Row

devrait suffire

Bon courage

 

[2passage]

Bonjour,

Bon, ben les 2 syntaxes fonctionnent chez moi... un ptit fichier exemple, au cas ou ?

A+

 

[Hellboy]

Bonjour Didier,Pascal76

Pour rajouter a la suggestion a Pascal76, si tu as des cellules vide entre tes données dans ta collonne, il est préférable pour ne pas te faire jour de tour de faire ainsi:

cells(65536,1).end(xlup).row

a+

Message édité par: Hellboy, à: 23/06/2005 16:37

 

[Didier]

Merci vous m'avez permis de résoudre indirectement mon problème.
Je m'explique (à mon avis faut pas chercher à comprendre).
Je voulais envoyer mon fichier Excel mais je me rends compte qu'il fait 2 mégas alors que j'ai 2 feuilles dont une vide et l'autre avec un tableau d'une vingtaine de lignes...
C'est pas la première fois que j'ai ca (le tableau était à l'origine très très grand...et le fichier très très gros). Je décide de supprimer sur la Sheets(1) toutes les lignes en dessous de mon tableau (je vous assure qu'il y avait rien en dessous) et il ne fait plus que quelques ko et ma macro fonctionne.
MErci Microsoft :angry: