CodeName qui plante

[LPandre]

Bonjour,

je reçois des fichiers Excel dont les noms d'onglets sont variables, mais qui doivent "subir" la même macro.

Je pensais passer par CodeName "Feuil1".select pour sélectionner la première feuille et faire le traitement, mais j'ai un message d'erreur :
Erreur compilation Attendu fin d'instruction.

Où est ce que je me plante ?

Merci.

 

[pierrejean]

Re : CodeName qui plante

Bonjour LPandre

Pour selectionner la feuille j'utiliserais:

Sub test()
For Each sh In Sheets
If sh.CodeName = "Feuil1" Then
sh.Select
Exit For
End If
Next
End Sub

 

[Paf]

Re : CodeName qui plante

Bonjour LPandre, pierrejean,


Peut être le codename n'est-il pas Feuil1 ?

une autre solution si la feuille à traiter a la même position dans chaque classeur:

    Worksheets(1).Select ' N° index de la feuille à adapter

A+

 

[job75]

Re : CodeName qui plante

Bonjour LPandre, Pierre, Paf,

"Feuil1".select ne peut pas fonctionner, il faut écrire Feuil1.Select ou encore Feuil1.Activate...

A+

 

[LPandre]

Re : CodeName qui plante

Je suis passé par la solution de Paf, ça marche.

Vais quand même tester les autres codes, ça peut servir.

Merci à tous.

Edit : marche bien aussi la solution de Pierre Jean!