Selection de la feuille active à la derniere feuille

[leaprovence]

Bonjour à tous !!!

j'ai besoin de sélectionner toutes les feuilles de mon classeur, de ma feuille active à la derniere...Sachant que je ne connais pas les noms des feuilles à l'avance...l'idée c'est ca :

Worksheets(Array(ActiveSheet.Select: Worksheets.Count)).Select

mais vous vous doutez bien que ca marche pas !!!looool

Quelqu'un à une idée ?
D'avance merci !

 

[Compte Supprimé 979]

Re : Selection de la feuille active à la derniere feuille

Bonjour Leaprovence et bienvenue sur ce forum 😉

Une des possibilités, cest :

  For Each Sht In ActiveWorkbook.Sheets
      Sht.Select Replace:=False
  Next Sht

Voilà 😀

 

[leaprovence]

Re : Selection de la feuille active à la derniere feuille

je te remercie de te prencher sur mon problème !!!!

mais ce code sélectionne toutes les feuilles de mon classeur, alors qu'il faudrait qu'il ne sélectionne que les dernieres...entre la feuille active ( comprise ) et la derniere....

c'est possible ?

 

[Pierrot93]

Re : Selection de la feuille active à la derniere feuille

Bonjour Leaprovence, Bruno

peut être comme ceci alors :

Dim i As Byte
For i = ActiveSheet.Index To Sheets.Count
    Sheets(i).Select False
Next i

bon après midi
@+

 

[leaprovence]

Re : Selection de la feuille active à la derniere feuille

Voilà !!!
Formidable !!!!


1000 mercis !!!!

Et bonne journée !

 

[bqtr]

Re : Selection de la feuille active à la derniere feuille

Bonsoir tous le monde,

Je remonte ce fil car je ne comprends pas l'utilisation du False
Pierrot ou quelqu'un d'autre pouvez vous m'expliquer le rôle du False.
Il annule la sélection tout en la gardant en mémoire ?
Pouvez vous éclairer ma lanterne ? 🙂

Merci

Bonne soirée

 

[Compte Supprimé 979]

Re : Selection de la feuille active à la derniere feuille

Salut Bqtr,

Si tu regardes mon code, je pense que c'est plus explicite (je ne veux pas me lancer des fleurs, mais bon 😀)

For Each Sht In ActiveWorkbook.Sheets
      Sht.Select Replace:=False
  Next Sht

Lors d'un select, si l'instruction FALSE n'est pas mise, la sélection de la feuille remplace la précédente sélection !

Voili, voilà 😉

 

[bqtr]

Re : Selection de la feuille active à la derniere feuille

Re,

Merci Bruno, voilà une chose de plus dans ma besace.😉
Quant aux fleurs, si si tu peux, parfois ça fait du bien.😀

Bonne fin de soirée