Masquer barres, entêtes, onglets et quadrillage
Fat17
Messages postés
90
Statut
Membre
-
cs_Le Pivert Messages postés 8437 Statut Contributeur -
cs_Le Pivert Messages postés 8437 Statut Contributeur -
Bonjour tout le monde,
Je cherche la macro qui me permet de masquer :
- la barre d'état
- la barre de formule
- les entêtes des lignes et des colonnes
- le quadrillage
- les onglets (j'en ai 60) à l'exception de l'onglet "O" qui contient le menu (ouverture des onglets masqués par lien hypertexte)
Avec ça, mon fichier va se transformer en "application" verrouillée à l'exception des plages autorisées.
Mes tentatives avec VBA sont restées partielles du fait de mon tout petit niveau en macros.
Avec votre aide, petit oiseau deviendra (peut être) grand !
Merci d'avance pour votre contribution
Cordialement
Fat
Je cherche la macro qui me permet de masquer :
- la barre d'état
- la barre de formule
- les entêtes des lignes et des colonnes
- le quadrillage
- les onglets (j'en ai 60) à l'exception de l'onglet "O" qui contient le menu (ouverture des onglets masqués par lien hypertexte)
Avec ça, mon fichier va se transformer en "application" verrouillée à l'exception des plages autorisées.
Mes tentatives avec VBA sont restées partielles du fait de mon tout petit niveau en macros.
Avec votre aide, petit oiseau deviendra (peut être) grand !
Merci d'avance pour votre contribution
Cordialement
Fat
3 réponses
-
Bonjour.
Je ne comprends pas :
Pourquoi te faut-il une macro alors qu'il te suffit de quelques clics dans l'onglet AFFICHAGE ?
-
Bonjour,
Je cherche la macro qui me permet de masquer :
- la barre d'état
- la barre de formule
- les entêtes des lignes et des colonnes
- le quadrillage
pour cela tu le fais manuellement en te servant de l'enregistreur de macro
et pour cela
- les onglets (j'en ai 60) à l'exception de l'onglet "O" qui contient le menu (ouverture des onglets masqués par lien hypertexte)
voici le code:
Option Explicit Sub test() 'Déclare la variable objet Worksheet Dim Ws As Worksheet 'Boucle sur toutes les feuille de calcul du classeur. Les onglets graphiques ne sont pas pris 'en compte. 'ThisWorkbook correspond à l'objet classeur contenant la macro For Each Ws In ThisWorkbook.Worksheets If Ws.Name <> "Feuil1" Then 'adapter le nom de la feuille visible Ws.Visible = False End If Next Ws End Sub
voilà
-
Merci Le Pivert, mais je ne saurai pas faire la macro manuellement.