OVH Cloud OVH Cloud

définir l'ordre des onglets

5 réponses
Avatar
Sabian
Salut

Je voudrais savoir si il y a une possibilit=E9 pour d=E9finir=20
l'ordre des onglets.
Du style, la feuille "new" se placera toujours en 2=E8me=20
position, la feuille "old" se placera toujours en 3=E8me=20
position...=20

... et ainsi de suite.

Merci de votre aide.

sabian

5 réponses

Avatar
ru-th
Salut

tu as des exemples là
http://www.excelabo.net/xl/feuilles.htm

mais si tu peux éventuellement te contenter de quelques lignes du type
On Error Resume Next
Sheets("news").Move Before:=Sheets(2)
Sheets("old").Move Before:=Sheets(3)

à mettre dans l'évenment open ou close de thisworkbook

a+
rural thierry


"Sabian" a écrit dans le message de news:
08a101c39a23$8f55e5d0$
Salut

Je voudrais savoir si il y a une possibilité pour définir
l'ordre des onglets.
Du style, la feuille "new" se placera toujours en 2ème
position, la feuille "old" se placera toujours en 3ème
position...

... et ainsi de suite.

Merci de votre aide.

sabian
Avatar
Joël
Bonjour

est-ce que cela ne convient pas ?

Worksheets.Add Worksheets(2)

--


Bien Cordialement

Joël GARBE
+33 6 60 58 20 68

"Sabian" a écrit dans le message de news:
08a101c39a23$8f55e5d0$
Salut

Je voudrais savoir si il y a une possibilité pour définir
l'ordre des onglets.
Du style, la feuille "new" se placera toujours en 2ème
position, la feuille "old" se placera toujours en 3ème
position...

... et ainsi de suite.

Merci de votre aide.

sabian
Avatar
Sabian
Nickel...
c'est parfait...
merci 1000 fois


-----Message d'origine-----
Salut

tu as des exemples là
http://www.excelabo.net/xl/feuilles.htm

mais si tu peux éventuellement te contenter de quelques
lignes du type

On Error Resume Next
Sheets("news").Move Before:=Sheets(2)
Sheets("old").Move Before:=Sheets(3)

à mettre dans l'évenment open ou close de thisworkbook

a+
rural thierry


"Sabian" a écrit dans le message de news:
08a101c39a23$8f55e5d0$
Salut

Je voudrais savoir si il y a une possibilité pour définir
l'ordre des onglets.
Du style, la feuille "new" se placera toujours en 2ème
position, la feuille "old" se placera toujours en 3ème
position...

.... et ainsi de suite.

Merci de votre aide.

sabian


.



Avatar
sabian
mhmmm pas vraiment dans ce cas précis, car je ne voulais
pas insérer de nouvelle page en fait...

Merci quand même...

Sabian


-----Message d'origine-----
Bonjour

est-ce que cela ne convient pas ?

Worksheets.Add Worksheets(2)

--


Bien Cordialement

Joël GARBE
+33 6 60 58 20 68

"Sabian" a écrit dans le message de news:
08a101c39a23$8f55e5d0$
Salut

Je voudrais savoir si il y a une possibilité pour définir
l'ordre des onglets.
Du style, la feuille "new" se placera toujours en 2ème
position, la feuille "old" se placera toujours en 3ème
position...

.... et ainsi de suite.

Merci de votre aide.

sabian


.



Avatar
AV
Ou encore...moins "manuel" :
Définir l'ordre de tes feuilles dans un tableau et déplacer en fonction de
l'ordre ainsi fixé :
A adapter...

Sub zz_Onglets()
tablo = Array("Feuil2", "Feuil3", "Feuil1")
x = 1
For i = 1 To 3
Sheets(Application.Index(tablo, i)).Move Before:=Sheets(x)
x = x + 1
Next
End Sub

AV