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 cacher une feuille

cacher une feuille

4 réponses
Avatar
MAVEAN
Je vais mettre a disposition des utilisateurs un classeur.
Sur une feuille en rentrant un code de produit , il pourront imprimer la
fiche de ce produit.
Sur la 2éme il rentreront leurs observetions.
toutes les infos seront sur une feuille que je souhaite cacher dans ce
classeur, mais qui est indispensable au fonctionnement des autres feuilles.
Comment faire ?
Signaler un problème avec ce contenu

4 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
jb
Bonjour,

Si cette feuille est référencée par des formules, il n'y a pas de pb
particulier.
Par macro, pour la sélectionner,il faut la rendre visible
momentanément avec Sheets("xx").visible=true
Pour la masquer et qu'elle ne puisse pas être rendue visible par un
utilisateur:
("xx").visible=xlveryhidden=true

Cordialement JB
Avatar
anonymousA
Bonjour,

il me semble qu'un copier-coller trop rapide t'a fait commettre une
erreur de syntaxe dans ta dernière phrase.

Il faut bien sur écrire Sheets("xx").visible=xlveryhidden

Cordialement,

A+

Bonjour,

Si cette feuille est référencée par des formules, il n'y a pas de pb
particulier.
Par macro, pour la sélectionner,il faut la rendre visible
momentanément avec Sheets("xx").visible=true
Pour la masquer et qu'elle ne puisse pas être rendue visible par un
utilisateur:
("xx").visible=xlveryhidden=true

Cordialement JB



Avatar
michdenis
Bonjour Jb,

On peut très bien travailler sur une feuille masquée pour en extirper toute l'information désirée par macro.

Un petit exemple :


'-------------------------------
Sub Trouver()

Dim R As Long, Mot As String
Mot = "réponset" ' Mot à rechercher
On Error Resume Next
With Worksheets("Feuil1")
.Visible = xlVeryHidden
R = .Range("A:A").Find(What:=Mot, _
LookIn:=xlValues, LookAt:=xlPart).Row
If Err = 0 Then
MsgBox R
Else
Err = 0
End If
.Visible = xlVeryHidden
End With
End Sub
'-------------------------------


Salutations!





"jb" a écrit dans le message de news:
Bonjour,

Si cette feuille est référencée par des formules, il n'y a pas de pb
particulier.
Par macro, pour la sélectionner,il faut la rendre visible
momentanément avec Sheets("xx").visible=true
Pour la masquer et qu'elle ne puisse pas être rendue visible par un
utilisateur:
("xx").visible=xlveryhidden=true

Cordialement JB
Avatar
anonymousA
Bonjour,

Tu as parfaitement raison dans le contexte que ta proc décrit. Mais il
me semble que ce jb voulait dire , c'est que pour selectionner une
feuille masquée, il convient de la démasquer d'abord.

A+

Bonjour Jb,

On peut très bien travailler sur une feuille masquée pour en extirper toute l'information désirée par macro.

Un petit exemple :


'-------------------------------
Sub Trouver()

Dim R As Long, Mot As String
Mot = "réponset" ' Mot à rechercher
On Error Resume Next
With Worksheets("Feuil1")
.Visible = xlVeryHidden
R = .Range("A:A").Find(What:=Mot, _
LookIn:=xlValues, LookAt:=xlPart).Row
If Err = 0 Then
MsgBox R
Else
Err = 0
End If
.Visible = xlVeryHidden
End With
End Sub
'-------------------------------


Salutations!





"jb" a écrit dans le message de news:
Bonjour,

Si cette feuille est référencée par des formules, il n'y a pas de pb
particulier.
Par macro, pour la sélectionner,il faut la rendre visible
momentanément avec Sheets("xx").visible=true
Pour la masquer et qu'elle ne puisse pas être rendue visible par un
utilisateur:
("xx").visible=xlveryhidden=true

Cordialement JB