[help] sélection de feuille

Résolu
bep42 Messages postés 27 Date d'inscription lundi 4 juin 2007 Statut Membre Dernière intervention 29 juin 2007 - 27 juin 2007 à 17:54
bep42 Messages postés 27 Date d'inscription lundi 4 juin 2007 Statut Membre Dernière intervention 29 juin 2007 - 28 juin 2007 à 13:55
bonjour à tous!

voilà je n'arrive pas à sélectionner toutes les feuille de mon workbook à partir de la feuille 4 (comprise) jusqu'à la fin...comment dois-je faire? quel est le code svp???

4 réponses

fiko81 Messages postés 381 Date d'inscription vendredi 24 septembre 2004 Statut Membre Dernière intervention 5 septembre 2010 3
27 juin 2007 à 21:41
Salut,
Tu peux tenter un truc comme ça :



Public Sub SheetsSelect()
Dim myArray() As String
Dim i As Integer

    For Each CurrentSheet In ThisWorkbook.Sheets
        If CurrentSheet.Name <> "Feuil1" And CurrentSheet.Name <> "Feuil2" And CurrentSheet.Name <> "Feuil3" Then
            ReDim Preserve myArray(i)
            myArray(i) =  CurrentSheet.Name
            i = i + 1
        End If
    Next CurrentSheet
    
    Sheets(myArray).Select

End Sub

 ,

----

(Coloration syntaxique automatique par Kenji)




 Fiko ;-)



La reponse vous convient pensez  > Accepter <
<hr />





<font color ="#80
3
fiko81 Messages postés 381 Date d'inscription vendredi 24 septembre 2004 Statut Membre Dernière intervention 5 septembre 2010 3
27 juin 2007 à 17:59
Salut,
Si tu enregistres une macro, elle te donnera ça :
Sheets(Array("Feuil1", "Feuil2", "Feuil3")).Select

 Fiko ;-)

La reponse vous convient pensez > Accepter <
<hr />
0
bep42 Messages postés 27 Date d'inscription lundi 4 juin 2007 Statut Membre Dernière intervention 29 juin 2007
27 juin 2007 à 18:22
oui sauf le problème que j'ai oublié de préciser c'est que les feuille se créaient en onction de l'utilisateur qui remplit une UserForm relatant des repas pour la cuisine (une prise de commande). La feuille se créait dans le workbook et prends le nom du client rentré dans la UserForm. Alors celà dépend de ce que le client aura choisit (comme client parmis une liste déroulate)...

donc je n'ai pas les noms des feuilles à l'avance mais par contre je sais que toutes mes feuilles de commande créé par l'utilisateur seront stocké dans le workbook après la page 3...soit de la page 4 à la fin!
0
bep42 Messages postés 27 Date d'inscription lundi 4 juin 2007 Statut Membre Dernière intervention 29 juin 2007
28 juin 2007 à 13:55
merci pour ton aide fiko :p
0