sélection d'une feuille de classeur

[steph]

A l'aide de VBA je souhait tapez le nom d'une feuille de classeur et la rendre active, suivant une liste de choix. Les feuilles du classeur s'incrementent au fur et à mesure de l'utilisation du classeur. J'ai déjà consulté WorksheetMap sur votre site mais sur celle-ci le code est vérrouillé par mot de passe.

 

[herve]

Bonjour steph !
Bonjour le forum,

la reponse est ICI

Au revoir et merci...

@+ hervé

 

[Celeda]

Bonjour,

merci Hervé,

voici une macro que Zon a faite une nuit au cours d'une de nos soirées d'apprentissage : on passe par une combo, on selectionne la feuille,
les feuilles s'incrémentent au fur et à mesure


1 À l'aide du menu :affichage - barre d'outils - boîtes à outils contrôles

Choisir Zone de liste modifiable

2 Copier les macros suivantes dans la feuille de code correspondant à cette feuille ("TaFeuille")
Option Explicit
Zon 04-04-04

Private Sub ComboBox1_Change()
On Error Resume Next
Sheets(ComboBox1.List(ComboBox1.ListIndex)).Activate
End Sub

Private Sub ComboBox1_GotFocus()
ComboBox1.List = RecupF
End Sub

Function RecupF()
Dim I&, J&, T()
For I = 1 To ThisWorkbook.Worksheets.Count
With Sheets(I)
If .Visible Then
ReDim Preserve T(J)
T(J) = .Name
J = J + 1
End If
End With
Next I
RecupF = T
End Function

Private Sub ComboBox1_LostFocus()
ComboBox1.Value = ""
End Sub


Merci Zon


Celeda

 

[steph]

merci pour votre aide Zon et Celeda

 

[steph]

merci hervé