Bonjour,
je voudrais, au démarage de mon classeur, masquer toutes les feuilles, sauf
la feuille nommée "G".
Merci.
Yann
J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre
d'onglets :
-----
Sub Auto_open()
Application.ScreenUpdating = False
For i = 1 To 1
Sheets(i).Visible = True
Next
For i = 2 To 50
Sheets(i).Visible = xlSheetVeryHidden
Next
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Ellimac
Bonjour,
Private Sub Workbook_Open() For Each f In ActiveWorkbook.Sheets If f.Name <> "G" Then f.Visible = False Next End Sub
Camille
Bonjour, je voudrais, au démarage de mon classeur, masquer toutes les feuilles, sauf la feuille nommée "G". Merci. Yann J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre d'onglets : ----- Sub Auto_open() Application.ScreenUpdating = False For i = 1 To 1 Sheets(i).Visible = True Next For i = 2 To 50 Sheets(i).Visible = xlSheetVeryHidden Next End Sub
Bonjour,
Private Sub Workbook_Open()
For Each f In ActiveWorkbook.Sheets
If f.Name <> "G" Then f.Visible = False
Next
End Sub
Camille
Bonjour,
je voudrais, au démarage de mon classeur, masquer toutes les feuilles, sauf
la feuille nommée "G".
Merci.
Yann
J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre
d'onglets :
-----
Sub Auto_open()
Application.ScreenUpdating = False
For i = 1 To 1
Sheets(i).Visible = True
Next
For i = 2 To 50
Sheets(i).Visible = xlSheetVeryHidden
Next
End Sub
Private Sub Workbook_Open() For Each f In ActiveWorkbook.Sheets If f.Name <> "G" Then f.Visible = False Next End Sub
Camille
Bonjour, je voudrais, au démarage de mon classeur, masquer toutes les feuilles, sauf la feuille nommée "G". Merci. Yann J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre d'onglets : ----- Sub Auto_open() Application.ScreenUpdating = False For i = 1 To 1 Sheets(i).Visible = True Next For i = 2 To 50 Sheets(i).Visible = xlSheetVeryHidden Next End Sub
JB
Bonjour,
For i = 2 To Sheets.Count
JB
On 30 nov, 17:21, Sunburn wrote:
Bonjour, je voudrais, au démarage de mon classeur, masquer toutes les feuilles, s auf la feuille nommée "G". Merci. Yann J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre d'onglets : ----- Sub Auto_open() Application.ScreenUpdating = False For i = 1 To 1 Sheets(i).Visible = True Next For i = 2 To 50 Sheets(i).Visible = xlSheetVeryHidden Next End Sub
Bonjour,
For i = 2 To Sheets.Count
JB
On 30 nov, 17:21, Sunburn <Sunb...@discussions.microsoft.com> wrote:
Bonjour,
je voudrais, au démarage de mon classeur, masquer toutes les feuilles, s auf
la feuille nommée "G".
Merci.
Yann
J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre
d'onglets :
-----
Sub Auto_open()
Application.ScreenUpdating = False
For i = 1 To 1
Sheets(i).Visible = True
Next
For i = 2 To 50
Sheets(i).Visible = xlSheetVeryHidden
Next
End Sub
Bonjour, je voudrais, au démarage de mon classeur, masquer toutes les feuilles, s auf la feuille nommée "G". Merci. Yann J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre d'onglets : ----- Sub Auto_open() Application.ScreenUpdating = False For i = 1 To 1 Sheets(i).Visible = True Next For i = 2 To 50 Sheets(i).Visible = xlSheetVeryHidden Next End Sub
Et si la feuille à conserver n'est pas la 1ère ? :) Camille
Bonjour,
For i = 2 To Sheets.Count
JB
On 30 nov, 17:21, Sunburn wrote:
Bonjour, je voudrais, au démarage de mon classeur, masquer toutes les feuilles, sauf la feuille nommée "G". Merci. Yann J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre d'onglets : ----- Sub Auto_open() Application.ScreenUpdating = False For i = 1 To 1 Sheets(i).Visible = True Next For i = 2 To 50 Sheets(i).Visible = xlSheetVeryHidden Next End Sub
Bonjour,
Et si la feuille à conserver n'est pas la 1ère ?
:) Camille
Bonjour,
For i = 2 To Sheets.Count
JB
On 30 nov, 17:21, Sunburn <Sunb...@discussions.microsoft.com> wrote:
Bonjour,
je voudrais, au démarage de mon classeur, masquer toutes les feuilles, sauf
la feuille nommée "G".
Merci.
Yann
J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre
d'onglets :
-----
Sub Auto_open()
Application.ScreenUpdating = False
For i = 1 To 1
Sheets(i).Visible = True
Next
For i = 2 To 50
Sheets(i).Visible = xlSheetVeryHidden
Next
End Sub
Et si la feuille à conserver n'est pas la 1ère ? :) Camille
Bonjour,
For i = 2 To Sheets.Count
JB
On 30 nov, 17:21, Sunburn wrote:
Bonjour, je voudrais, au démarage de mon classeur, masquer toutes les feuilles, sauf la feuille nommée "G". Merci. Yann J'ai essayé ça, mais je voudrais ne pas à avoir à déterminer le nombre d'onglets : ----- Sub Auto_open() Application.ScreenUpdating = False For i = 1 To 1 Sheets(i).Visible = True Next For i = 2 To 50 Sheets(i).Visible = xlSheetVeryHidden Next End Sub