incompatibilité macro
Bonjour,
Je sollicite votre aide car je suis face à un problème qui je ne parvient pas à résoudre.
Dans le fichier ci joint je souhaiterais:
- que lorsque je clic sur le bouton ile de france de la feuille "carte" cela m'emene sur la feuille ile de france (cela fonctionne)
- que lorsque je clic sur le bouton "paris intra muros" de la feuille "ile de france" cela me conduise sur la feuil13 (feuil1) . Hors dans l'état actuel des choses, lorsque je clic sur le boutno "paris intramuros", je tombe sur un msg d'erreur. Cela est du, je le soupçone à la macro présente dans mon WorkBook:
Private Sub Workbook_Open()
Dim n As Long
For n = 1 To Me.Sheets.Count
If Me.Sheets(n).Name <> "Carte" Then Me.Sheets(n).Visible = False
Next n
End Sub
Problème: je souhaite conservé cette macro sans pour autant qu'elle compromète l'utilisation de mon classeur.
Merci d'avance pour votre aide
Bonjour,
Je sollicite votre aide car je suis face à un problème qui je ne parvient pas à résoudre.
Dans le fichier ci joint je souhaiterais:
- que lorsque je clic sur le bouton ile de france de la feuille "carte" cela m'emene sur la feuille ile de france (cela fonctionne)
- que lorsque je clic sur le bouton "paris intra muros" de la feuille "ile de france" cela me conduise sur la feuil13 (feuil1) . Hors dans l'état actuel des choses, lorsque je clic sur le boutno "paris intramuros", je tombe sur un msg d'erreur. Cela est du, je le soupçone à la macro présente dans mon WorkBook:
Private Sub Workbook_Open()
Dim n As Long
For n = 1 To Me.Sheets.Count
If Me.Sheets(n).Name <> "Carte" Then Me.Sheets(n).Visible = False
Next n
End Sub
Problème: je souhaite conservé cette macro sans pour autant qu'elle compromète l'utilisation de mon classeur.
Merci d'avance pour votre aide
Pièces jointes
Dernière édition: