pb de code vba

[keke31]

Bonjour,
je voudrais effectuer un code vba qui me permet d'ouvirir la feuille 1 si je tape dans une cellule le chiffre 1 et la feuille 2 si je tape le chiffre 2 dans la meme cellule.
Voila j'espere que vous m'avez compris et merci de me répondre.

 

[tototiti2008]

Re : pb de code vba

Bonjour keke,

vois si ça te conviens :

 

[keke31]

Re : pb de code vba

cela me convient totalement sur le principe le seul probleme c'est qu'étant donné qu'il y a de nombreuses feuilles je les ai caché et alors ca marche plus peut être aurait tu une solution ?
voila merci .

 

[job75]

Re : pb de code vba

Bonjour keke, tototiti,

Une variante. Si le nombre n est entré dans la cellule A1, la feuille de rang n est activée. Si n est le nom d'une feuille, cela marche aussi.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Address = "$A$1" Then
Sheets(Target.Value).Activate
ActiveSheet.Visible = True
End If
End Sub

A+

Edit : ajouté Visible pour tenir compte du post de keke

 

[tototiti2008]

Re : pb de code vba

un essai avec les feuilles masquées

 

[keke31]

Re : pb de code vba

Merci vraiment c'est exactement ce que je voulais et cela marche très bien je suis vraiment content encore merci.

 

[tototiti2008]

Re : pb de code vba

la remarque de job est intéressante, plutôt que de gérer tous les cas des feuilles, tu pourrait les appeler en fonction de leur numéro, ça pourrait beaucoup raccourcir le code si tu as plein de feuilles...