Prendre l'info sur une feuille dynamique

[Yohan05]

Bonjour à tous,


Je vous explique mon problème, j'ai une feuille nommée commande mais suivant certains cas elle est nommée commande 1.

J'aimerais prendre des données de cette feuille pour envoyer dans un autre classeur comment puis-je procéder?

comme ceci?

For Each Onglet In ThisWorkbook.Worksheets
'Si la feuille contient Commande
If InStr(1, Onglet.Name, "Commande") > 0 Then

Mais par quoi je dois remplacer mes variable?
p = Sheets("Commande").Range("g4").Value => onglet.name?


Attention je n'ai pas envie que ce soit For each
Merci de votre aide...

Yohan

 

[Gardien de phare]

Re : Prendre l'info sur une feuille dynamique

Bonjour,

Utiliser le "codename" de la feuille (numéro) qui est invariable, non ?

HTH

 

[Yohan05]

Re : Prendre l'info sur une feuille dynamique

Re,

Non, la feuille est "commande" mais si il y en a plusieurs cela commence à "commande 1".

Merci

Yohan

 

[Gardien de phare]

Re : Prendre l'info sur une feuille dynamique

Re,
Activer la feuille et utiliser Activesheet ?

 

[xhudi69]

Re : Prendre l'info sur une feuille dynamique

Bonjour Yohan05,
Gardien de phare, HTH

J'utilise ceci:

Sub onglet()
Dim ws As Object

For Each ws In Sheets
    If ws.Name = "COMMANDE" Then
        Sheets("COMMANDE").Activate ' ou ta procédure.....
    End If
Next ws
End Sub

@+