Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel onglets inaccessible

onglets inaccessible

6 réponses
Avatar
Donnazac
Bonsoir
J'ai win XP et excel 2003 je voudrai interdir l'accés aux onglets de feuille
j'ai beau protege feuille classeur et macros , l'accés à Outils -->
Options --> Affichage --> activer "onglets" est toujours libre d'accés.
Quelle est la solution
Merci pour votre aide
Amitiés
Anne-Marie
Signaler un problème avec ce contenu

6 réponses

Supprimer
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
Avatar
Jean-Claude
Options --> Affichage --> activer "onglets" est toujours libre d'accés.


Bonsoir,
Par l'intermédiaire deVBA
La propriété de visible de l'onglet concerné doit être mis à
xlSheetVeryHidden

A+
Jc

Avatar
Donnazac
Merci pour votre réponse mais je ne comprends pas comment utiliser
"xlSheetVeryHidden", il me semble que d'habitude on l'utilise pour masquer
une feuille .
J'ai crée une feuille "menu" dans laquelle j'ai mis des boutons pour aller
Private Sub Workbook_Open()
Worksheets("menu").Select
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
End Sub
mais cela n'empeche pas que l'on peut activer les onglets malgré la
protection de la feuille
Merci pour votre aide

Anne-Marie

"Jean-Claude" a écrit dans le message de
news:


Options --> Affichage --> activer "onglets" est toujours libre d'accés.


Bonsoir,
Par l'intermédiaire deVBA
La propriété de visible de l'onglet concerné doit être mis à
xlSheetVeryHidden

A+
Jc





Avatar
Vincent
Bonjour

Sub Cache_barre_menu()
Application.CommandBars("Worksheet Menu Bar").Enabled = False
End Sub

Cordialement
Vincent


"Donnazac" a écrit dans le message de news:

Merci pour votre réponse mais je ne comprends pas comment utiliser
"xlSheetVeryHidden", il me semble que d'habitude on l'utilise pour
masquer
une feuille .
J'ai crée une feuille "menu" dans laquelle j'ai mis des boutons pour aller
Private Sub Workbook_Open()
Worksheets("menu").Select
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
End Sub
mais cela n'empeche pas que l'on peut activer les onglets malgré la
protection de la feuille
Merci pour votre aide

Anne-Marie

"Jean-Claude" a écrit dans le message de
news:


Options --> Affichage --> activer "onglets" est toujours libre d'accés.


Bonsoir,
Par l'intermédiaire deVBA
La propriété de visible de l'onglet concerné doit être mis à
xlSheetVeryHidden

A+
Jc









Avatar
Philippe.R
Bonsoir Anne-Marie,

Et en collant ceci :

Private Sub Worksheet_Activate()
ActiveWindow.DisplayWorkbookTabs = False
End Sub

dans le module de chacune des feuilles de ton classeur, que se passe t il ?
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"Donnazac" a écrit dans le message de news:

Merci pour votre réponse mais je ne comprends pas comment utiliser
"xlSheetVeryHidden", il me semble que d'habitude on l'utilise pour masquer
une feuille .
J'ai crée une feuille "menu" dans laquelle j'ai mis des boutons pour aller
Private Sub Workbook_Open()
Worksheets("menu").Select
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
End Sub
mais cela n'empeche pas que l'on peut activer les onglets malgré la
protection de la feuille
Merci pour votre aide

Anne-Marie

"Jean-Claude" a écrit dans le message de
news:


Options --> Affichage --> activer "onglets" est toujours libre d'accés.


Bonsoir,
Par l'intermédiaire deVBA
La propriété de visible de l'onglet concerné doit être mis à
xlSheetVeryHidden

A+
Jc









Avatar
Donnazac
merci ca a carrement masquer la barre d'outils c'est génial comme ca
personne pourra saboter le fichier comme c'est arriver il n'y a pas 15 jours
dans notre association où je travaille bénévolement..
Merci beaucoup pour votre aide
Cordialement
Anne-Marie

"Vincent" a écrit dans le message de
news:
Bonjour

Sub Cache_barre_menu()
Application.CommandBars("Worksheet Menu Bar").Enabled = False
End Sub

Cordialement
Vincent


"Donnazac" a écrit dans le message de
news:


Merci pour votre réponse mais je ne comprends pas comment utiliser
"xlSheetVeryHidden", il me semble que d'habitude on l'utilise pour
masquer
une feuille .
J'ai crée une feuille "menu" dans laquelle j'ai mis des boutons pour
aller


dans les feuilles protégées , j'avais décocher les onglets et j'ai ecrit
:


Private Sub Workbook_Open()
Worksheets("menu").Select
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
End Sub
mais cela n'empeche pas que l'on peut activer les onglets malgré la
protection de la feuille
Merci pour votre aide

Anne-Marie

"Jean-Claude" a écrit dans le message de
news:


Options --> Affichage --> activer "onglets" est toujours libre
d'accés.





Bonsoir,
Par l'intermédiaire deVBA
La propriété de visible de l'onglet concerné doit être mis à
xlSheetVeryHidden

A+
Jc













Avatar
Donnazac
Bonjour
oui ca marche mais maintenant tous les classeurs que j'ouvre n'ont plus la
barre de menus. Comment faire pour que ce ne soit que pour ce classeur ?
J'ai ecrit
Private Sub Workbook_Open()
CacheBarreMenu
Worksheets("menu").Select
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
End Sub
et j'ai mis CacheBarreMenu dans le module 1

Merci pour votre aide Anne-Marie

"Vincent" a écrit dans le message de news:

Bonjour

Sub Cache_barre_menu()
Application.CommandBars("Worksheet Menu Bar").Enabled = False
End Sub

Cordialement
Vincent


"Donnazac" a écrit dans le message de
news:
Merci pour votre réponse mais je ne comprends pas comment utiliser
"xlSheetVeryHidden", il me semble que d'habitude on l'utilise pour
masquer
une feuille .
J'ai crée une feuille "menu" dans laquelle j'ai mis des boutons pour
aller
dans les feuilles protégées , j'avais décocher les onglets et j'ai ecrit
:
Private Sub Workbook_Open()
Worksheets("menu").Select
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
End Sub
mais cela n'empeche pas que l'on peut activer les onglets malgré la
protection de la feuille
Merci pour votre aide

Anne-Marie

"Jean-Claude" a écrit dans le message de
news:


Options --> Affichage --> activer "onglets" est toujours libre
d'accés.


Bonsoir,
Par l'intermédiaire deVBA
La propriété de visible de l'onglet concerné doit être mis à
xlSheetVeryHidden

A+
Jc