Passer directement au contenu principal
Office

Noms masqués trouvés

L’inspecteur de document a trouvé les noms masqués dans votre classeur. Les noms suivants peuvent contenir des informations masquées sur les scénarios de solveur. Par exemple, lorsque vous Utilisez le complément solveur pour exécuter un scénario, il est possible que les informations relatives aux paramètres de calcul et aux autres données sensibles apparaissent en tant que noms masqués dans votre classeur.

Important : Microsoft fournit des exemples de programmation uniquement à des fins d’illustration, sans garantie, expresse ou implicite. Cela comprend, sans s’y limiter, les garanties implicites en matière de qualité marchande ou d’adéquation à un but particulier. Cet article part du principe que vous êtes familiarisé avec le langage de programmation présenté et avec les outils utilisés pour créer et déboguer des procédures. Les ingénieurs du support Microsoft peuvent vous aider à expliquer les fonctionnalités d’une procédure particulière, mais ils ne modifieront pas ces exemples pour fournir des fonctionnalités ajoutées ou des procédures de construction adaptées à vos besoins spécifiques.

Problème

L’inspecteur de document ne peut pas supprimer les noms masqués pour vous.

Solution recommandée

Exécutez la macro suivante pour supprimer les noms masqués. La macro affiche une zone de message qui recense trois éléments : (1) si le nom défini est visible ou masqué, (2) le nom défini et (3) ce que ce nom fait référence (la référence de cellule de classeur). Il est possible que vous choisissiez Oui ou non pour supprimer ou conserver chaque nom défini.

Remarque : Si vous utilisez cette macro pour supprimer les noms masqués, les compléments (comme le solveur) ou les macros peuvent ne pas fonctionner comme prévu et risquent de perdre des données masquées qui leur sont associées. Cette macro s’applique également aux noms définis qui sont masqués, pas seulement ceux qui ont été ajoutés par le solveur.

Attention : Si les noms des feuilles contiennent des espaces, vous pouvez recevoir un message d’erreur lorsque vous tentez de supprimer le nom défini.

Supprimer les noms masqués

' Module to remove all hidden names on active workbook
   Sub Remove_Hidden_Names()

       ' Dimension variables.
       Dim xName As Variant
       Dim Result As Variant
       Dim Vis As Variant

       ' Loop once for each name in the workbook.
       For Each xName In ActiveWorkbook.Names

           'If a name is not visible (it is hidden)...
           If xName.Visible = True Then
               Vis = "Visible"
           Else
               Vis = "Hidden"
           End If

           ' ...ask whether or not to delete the name.
           Result = MsgBox(prompt:="Delete " & Vis & " Name " & _
               Chr(10) & xName.Name & "?" & Chr(10) & _
               "Which refers to: " & Chr(10) & xName.RefersTo, _
               Buttons:=vbYesNo)

           ' If the result is true, then delete the name.
           If Result = vbYes Then xName.Delete

           ' Loop to the next name.
       Next xName

   End Sub

Remarque :  Cette page a été traduite automatiquement et peut donc contenir des erreurs grammaticales ou des imprécisions. Notre objectif est de faire en sorte que ce contenu vous soit utile. Pouvez vous nous dire si les informations vous ont été utiles ? Voici l’article en anglais pour référence.

Développez vos compétences dans Office
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoignez le programme Office Insider

Ces informations vous ont-elles été utiles ?

Nous vous remercions pour vos commentaires.

Merci pour vos commentaires. Il serait vraisemblablement utile pour vous de contacter l’un de nos agents du support Office.

×