Passer au contenu principal

Trois méthodes masquent / masquent rapidement le contenu des cellules avec un astérisque ou une autre chaîne dans Excel

Parfois, vous souhaiterez peut-être masquer certains contenus de cellule pendant que vous partagez le classeur avec d'autres utilisateurs, comme illustré ci-dessous. Ici, cet article présentera trois méthodes de masquage des cellules avec un astérisque pour masquer le contenu dans Excel.
masque doc cellule 1


Masquer et masquer le contenu des cellules avec un astérisque avec Formater les cellules

Dans Excel, pour masquer le contenu des cellules avec un astérisque, vous pouvez utiliser la fonction Formater les cellules.

1. Sélectionnez les cellules que vous souhaitez masquer avec un astérisque, puis cliquez avec le bouton droit pour sélectionner Format de cellule dans le menu contextuel.
masque doc cellule 2

2. dans le Format de cellule dialogue, sous Numéro onglet, sélectionnez Coutume du Catégories list, puis tapez ;;; ** dans la zone de texte sous Type.
masque doc cellule 4

3. Cliquez OK, maintenant le contenu de la cellule de sélection a été masqué par des astérisques.
masque doc cellule 3

Mais le contenu de la cellule peut également être visualisé dans la barre de formule.
masque doc cellule 5

4. Placez le curseur sur la cellule dont vous ne souhaitez pas masquer le contenu, puis cliquez sur Avis > Protéger la feuille, et décochez Sélectionnez les cellules de déverrouillage et Format de cellule (autres options que vous pouvez vérifier selon vos besoins), puis tapez et confirmez le mot de passe pour protéger la feuille dans les boîtes de dialogue contextuelles.
masque doc cellule 6

Ensuite, le contenu de la cellule a été masqué et masqué par des astérisques.

Notes: Si le contenu de la cellule est une chaîne numérique, de cette façon uniquement avec l'affichage du contenu de la cellule comme vide.
masque doc cellule 7


Masquer les lignes avec # N / A ou d'autres valeurs d'erreur spécifiques par code VBA

Si vous souhaitez masquer à la fois les chiffres et les textes, vous pouvez appliquer le code VBA.

1. Sélectionnez les cellules que vous souhaitez crypter et appuyez sur Alt + F11 clés pour activer Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Module, puis copiez et collez le code ci-dessous dans le nouveau module.

VBA: Masquer les lignes d'erreur # N / A

Sub E_Cells()
'UpdatebyExtendoffice
Dim xRg As Range
Dim xERg As Range
Dim xWs As Worksheet
Dim xStrRg As String
Dim xStrPw As String
xStrPw = ""
xStrPw = Application.InputBox("Enter Password", "", "", Type:=2)
If xStrPw = "" Then Exit Sub
On Error Resume Next
Set xERg = Selection
Set xWs = Application.ActiveSheet
Set xRg = xWs.Cells
xRg.Locked = False
xERg.Locked = True
xERg.NumberFormatLocal = "**;**;**;**"
xWs.Protect Password:=xStrPw, DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub 

3. presse F5 clé pour exécuter le code. Et puis tapez le mot de passe dans la boîte de dialogue contextuelle, puis cliquez sur le OK bouton. Voir la capture d'écran:
masque doc cellule 8

Conseil:

1. Pour déchiffrer les cellules, vous pouvez utiliser le code de macro ci-dessous.

Sub D_Cells()
'UpdatebyExtendoffice
Dim xRg As Range
Dim xERg As Range
Dim xWs As Worksheet
Dim xStrRg As String
Dim xStrPw As String
xStrPw = ""
xStrPw = Application.InputBox("Type Password", "", "", Type:=2)
If xStrPw = "" Then Exit Sub
On Error Resume Next
Set xWs = Application.ActiveSheet
Set xRg = xWs.UsedRange
xERg.NumberFormatLocal = "**;**;**;**"
xWs.Unprotect Password:=xStrPw
For Each xERg In xRg
    If xERg.Locked Then xERg.NumberFormatLocal = "@"
Next
End Sub

2. Avec le code VBA, le contenu de la cellule peut également être visualisé dans la barre de formule.


Crypter et masquer le contenu des cellules avec un astérisque ou une autre chaîne

Si vous souhaitez crypter et masquer le contenu des cellules avec la chaîne spéciale dont vous avez besoin, le Crypter la cellules caractéristique de Kutools for Excel peut faire une belle faveur.

L'outil Chiffrer les cellules dans Kutools for Excel peut :

1. Crypter les cellules avec du blanc
2. Crypter les cellules avec des caractères
3. Cryptez les cellules avec une chaîne spécifiée.

Kutools for Excel contient 300 outils avancés pour résoudre vos puzzles Excel à 90 % et vous offre un essai gratuit de 30 jours.

Après installation gratuite de Kutools pour Excel (essai gratuit de 60 jours), veuillez suivre les étapes ci-dessous.

1. Sélectionnez les cellules que vous souhaitez masquer, puis cliquez sur Kutools Plus > Crypter les cellules.
masque doc cellule 9

2. Ensuite, dans la boîte de dialogue contextuelle, tapez et confirmez le mot de passe, puis dans Masques section, cochez l'option selon vos besoins.
masque doc cellule 10

3. Puis clique Ok. À l'heure actuelle, toutes les cellules sélectionnées ont été masquées.

En cliquant Aucun, les cellules affichent une chaîne de charabia.
masque doc cellule 11
masque doc cellule 12

En cliquant Carboniser option, vous pouvez taper n'importe quel caractère dans la zone de texte, puis les cellules afficheront le caractère uniquement.
masque doc cellule 13
masque doc cellule 14

En cliquant Chaîne , puis tapez la chaîne que vous souhaitez afficher dans les cellules.
masque doc cellule 15
masque doc cellule 16

Conseil : si vous souhaitez décrypter les cellules ou afficher le contenu des cellules, vous pouvez cliquer sur Kutools Plus > Décrypter les cellules, puis tapez le mot de passe pour déchiffrer avec succès.
masque doc cellule 17


Autres opérations (articles) liées au masquage

Masquer les lignes en fonction de la valeur
Ce didacticiel fournit des méthodes pour masquer les lignes en fonction de la valeur (égale à / supérieure à / inférieure à) dans une autre colonne d'Excel.

Masquer une partie de la chaîne de texte
Parfois, vous souhaitez masquer une partie de la chaîne pour protéger les informations privées, telles que le numéro de téléphone 123-xxx-xxxx, comment pouvez-vous faire? Dans cet article, vous trouverez les solutions simples.

Meilleurs outils de productivité bureautique

🤖 Aide à l'IA Kutools: Révolutionner l'analyse des données en s'appuyant sur : Exécution intelligente   |  Générer du code  |  Créer des formules personnalisées  |  Analyser les données et générer des graphiques  |  Invoquer les fonctions Kutools...
Caractéristiques populaires: Rechercher, mettre en évidence ou identifier les doublons   |  Supprimer les lignes vides   |  Combinez des colonnes ou des cellules sans perdre de données   |   Tour sans formule 
Super recherche: VSearchup à critères multiples    VSearch à valeurs multiples  |   Recherche virtuelle sur plusieurs feuilles   |   Recherche floue ....
Liste déroulante avancée: Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple ....
Gestionnaire de colonnes: Ajouter un nombre spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages et les colonnes 
Caractéristiques en vedette: Mise au point de la grille   |  Voir Design   |   Grande barre de formule    Gestionnaire de classeurs et de feuilles   |  Centre de ressources (Texte automatique)   |  Sélecteur de date   |  Combiner des feuilles de travail   |  Crypter/déchiffrer les cellules    Envoyer des e-mails par liste   |  Super filtre   |   Filtre spécial (filtre gras/italique/barré...) ...
Les 15 meilleurs ensembles d'outils12 Texte Outils (Ajouter du texte, Supprimer les caractères, ...)   |   50+ Graphique Types (Diagramme de Gantt, ...)   |   40+ Pratique Formules (Calculer l'âge en fonction de l'anniversaire, ...)   |   19 Insertion Outils (Insérer le code QR, Insérer une image à partir du chemin, ...)   |   12 Conversion Outils (Nombres en mots, Conversion des devises, ...)   |   7 Fusionner et fractionner Outils (Lignes de combinaison avancées, Cellules divisés, ...)   |   ... et plus

Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps.  Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...

Description


Office Tab apporte une interface à onglets à Office et facilite grandement votre travail

  • Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hola, yo lo solucione asi:
1. Formula: =SI(J7=1;lo que quieren mostrar;"******") y luego,
2. Macro: una macro que descargue el 1 en la celda J7.
3. Boton: un botón que ejecute la macro, puede llamarse mostrar cifrado o algo asi.

De esta manera, se logra solucionar las mascaras u ocultamiento de celdas.
This comment was minimized by the moderator on the site
Is it possible to create a mask email without the email account's password?
This comment was minimized by the moderator on the site
I suggest this:
A1 content               - Expected - foo***********com

Formula:=LEFT(A1,3)&REPT("*",LEN(A1)-6)&RIGHT(A1,3)
Remove left or/and right and change the length to control what to replace with * and what to keep at the beginning or at the end.
This comment was minimized by the moderator on the site
If you want to hide only some parts of the string, here is another way:

=LEFT(A1,3)&REPT("*",LEN(A1)-6)&RIGHT(A1,3)
Explanation:
1. LEFT - Will add some letters from the left of the phrase.2. REPT - Will repeat *, n times. where n can be LEN(A1) or LEN(A1)-X where X is the number fo letters that you want to keep showing3. RIGHT - Will add some letters from the end of the phrase.
If A1 content is formula will result in:
foo***********com
This comment was minimized by the moderator on the site
How do Mask baseon cell value :Sub tra5()Dim selrange As Range
Dim dgstring1, dgstring2, dgstring3, dgstring4 As String
dgstring1 = Sheet1.Range("F26")
dgstring2 = Sheet1.Range("F26")
dgstring3 = Sheet1.Range("F26")
dgstring4 = Sheet1.Range("F26")
dgstring = "dgstring1;dgstring2;dgstring3;dgstring4"
selrange.NumberFormatLocal = dgstring
End Sub

Please help.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations