Discussion :

[Potzo]

Bonjour tout le monde,

J'ai ecris ceci :

Code :

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

LetzteSpalte = GRAPHIK.Cells(8, GRAPHIK.Cells(8, Columns.Count).End(xlToLeft).Column)

Pour savoir quelle est la derniere colonne de la ligne 8 qui contient des donnees.
Malheureusement... c'est faux vu que ca refuse de compiler, mais je vois pas mon erreur.

D'habitude j'utilise plutot la syntaxe de ce type la (pour chercher les dernieres lignes ):

Code :

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

Range("A8:A" & Cells(Rows.count,1).End(xlUp).Row)

mais la ca marche pas avec une recherche de colonne...

Merci d'avance !

[delphine35]

Code :

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

LetzteSpalte = GRAPHIK.Cells(8, GRAPHIK.Cells(8,GRAPHIK.Columns.Count).End(xlToLeft).Column).Column

ou avec With :

Code :

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

1
2
3
4
 
With GRAPHIK
LetzteSpalte = .Cells(8, .Cells(8,.Columns.Count).End(xlToLeft).Column).Column
end with

[Potzo]

Code :

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

LetzteSpalte = GRAPHIK.Cells(8, GRAPHIK.Cells(8,GRAPHIK.Columns.Count).End(xlToLeft).Column).Column

ou avec With :

Code :

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

1
2
3
4
 
With GRAPHIK
LetzteSpalte = .Cells(8, .Cells(8,.Columns.Count).End(xlToLeft).Column).Column
end with

Ca fonctionne

Merci !

[Gorfael]

[QUOTE=Potzo;5368724]Bonjour tout le monde,

J'ai ecris ceci :

Code :

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

LetzteSpalte = GRAPHIK.Cells(8, GRAPHIK.Cells(8, Columns.Count).End(xlToLeft).Column)

Malheureusement... c'est faux vu que ca refuse de compiler, mais je vois pas mon erreur. Nous non plus, quelle erreur ? quel numéro ?
Ne connaissant que ça, difficile de dépanner. Sans doute deux possibilités :
- LetzteSpalte déclarée en Range et alors, il manque le Set
- Aucune feuille dont le nom informatique soit "GRAPHIK" : manque Sheets("GRAPHIK")

Mais pour avoir un dépannage, il est préférable de fournir les données, comme le code en intégralité, ou/et un bout de fichier donnant l'erreur
A+