Sélectionner tous les onglet sauf le dernier

La braise · 2 Juillet 2009

Bonjour à tous,

J'utilise des fichiers au nombre d'onglet variable.

J'affecte le nb d'onglet dans un variable que je défini avec : Application.Sheets.Count

ce que je souhaite c'est sélectionner tous les onglets sauf le dernier.

Idéalement il me faudrait un array(sheet(1) jusqu'à Sheet(mavariable -1))

et la c'est le drame.... ça marche pas!

Je suis sur que c'est un truc tout bête, si quelqu'un peut m'aider...

D'avance merci pour votre aide toujours aussi efficace.

Pierrot93 · 2 Juillet 2009

Re : Sélectionner tous les onglet sauf le dernier

Bonjour La Braise

si j'ai bien compris....

Code:

Dim i As Byte
For i = 1 To Sheets.Count - 1
    Sheets(i).Select IIf(i = 1, 1, 0)
Next i

bonne fin d'après midi
@+

La braise · 2 Juillet 2009

Re : Sélectionner tous les onglet sauf le dernier

Pierrot93,

Comme d'hab. rien à dire ça fonctionne nickel!

Merci beaucoup pour ton aide.

Sélectionner tous les onglet sauf le dernier

La braise

XLDnaute Occasionnel

Pierrot93

XLDnaute Barbatruc

La braise

XLDnaute Occasionnel

Discussions similaires