Exclure des Sheets d'une fonction For each WS ...

[Guigui]

Hello le forum,

Qui peux me renseigner, je voudrais exclure des feuilles du code :

Application.CommandBars('Workbook tabs').ShowPopup 500, 200

ainsi que dans :

Dim WS As Worksheet
With Me.ComboBox1
For Each WS In ThisWorkbook.Worksheets
.AddItem WS.Name
Next
End With

Est-ce possible ?

Merci d'avance pour vos reponses.

Ps: j'ai réouvert un post de courant mars
Lien supprimé pour posé cette question mais ce nouveau post me semble plus clair et explicite. désolé donc pour le bazar ...

 

[Pierre]

Re:Exclure des Sheets d'une fonction For each WS .

Bonsoir Guigui,

For Each ws In ThisWorkbook.Worksheets
If ws.Name = 'Feuil1' Or ws.Name = ' ' Or ws.Name = 'Feuil2' Then
Else
AddItem ws.Name
End If
Next

Ceci devrait te convenir, en mettant entre guillemets les noms des feuilles à exclure.

Bonne soirée

Message édité par: Pierre, à: 14/04/2005 20:02

Message édité par: Pierre, à: 14/04/2005 20:03

 

[Guigui]

Re:Exclure des Sheets d'une fonction For each WS .

Hello pierre,

Merci beaucoup pour ton aide

C impec

Merci encore.

A+
Guillaume