Drie methoden om snel celinhoud te verbergen/maskeren met een asterisk of andere tekst in Excel
Soms wilt u mogelijk bepaalde celinhoud verbergen wanneer u het werkblad deelt met andere gebruikers, zoals in onderstaande schermafbeelding. In dit artikel introduceren we drie methoden voor het maskeren van cellen met een asterisk om de inhoud in Excel te verbergen.
- Verberg en masker celinhoud met een asterisk via Celopmaak
- Verberg en masker celinhoud met een asterisk via VBA-code
- Versleutel en masker celinhoud met een asterisk of andere tekst
- Andere gerelateerde artikelen (bewerkingen) over werkbladen
In Excel kunt u de functie Celopmaak gebruiken om celinhoud te maskeren met een asterisk.
1. Selecteer de cellen die u wilt verbergen met een asterisk, klik dan met de rechtermuisknop en selecteer Celopmaak uit het contextmenu.
2. In het Celopmaak dialoogvenster, onder het tabblad Getal selecteert u Aangepast uit de Categorie lijst, en typ vervolgens ;;;** in het tekstvak onder Type.
3. Klik op OK, nu is de geselecteerde celinhoud gemaskeerd met sterretjes.
De celinhoud blijft echter zichtbaar in de formulebalk.
4. Plaats de cursor in de cel waarvan u de inhoud niet wilt verbergen, klik dan op Controleren > Werkblad beveiligen, en vink Selecteer ontgrendelde cellen en Celopmaak instellen optie uit (andere opties kunt u aanvinken indien nodig), voer vervolgens en bevestig het wachtwoord om het werkblad te beschermen in de pop-up dialoogvensters.
De celinhoud is nu verborgen en gemaskeerd met sterretjes.
Opmerking: Als de celinhoud numerieke tekens zijn, zal deze methode alleen de celinhoud als leeg weergeven.
Als u zowel getallen als tekst wilt maskeren, kunt u VBA-code gebruiken.
1. Selecteer de cellen die u wilt versleutelen en druk op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Invoegen > Module, kopieer en plak vervolgens onderstaande code in de nieuwe Module.
VBA: Verberg rijen met #N/B fouten
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. Druk op F5 om de code uit te voeren. Voer vervolgens het wachtwoord in het pop-up dialoogvenster in en klik op de OK knop. Zie screenshot:
Tip:
1. Voor het decoderen van de cellen kunt u onderstaande macrocode gebruiken.
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. Met de VBA-code blijft de celinhoud ook zichtbaar in de formulebalk.
Als u celinhoud wilt versleutelen en maskeren met een specifieke tekst naar keuze, kan de functie Cellen Versleutelen van Kutools voor Excel u goed van dienst zijn.
Het hulpprogramma Cellen Versleutelen in Kutools voor Excel kan: 1. Cellen versleutelen met blanco Kutools voor Excel bevat 300 geavanceerde tools om 90% van uw Excel-problemen op te lossen en biedt u een 30-daagse gratis proefversie. |
Na het gratis installeren van Kutools voor Excel (30-daagse gratis proefversie), volg dan onderstaande stappen.
1. Selecteer de cellen die u wilt maskeren, klik dan op Kutools Plus > Cellen Versleutelen.
2. Typ en bevestig vervolgens het wachtwoord in het pop-up dialoogvenster, en in de Masker sectie, vink de optie aan die u nodig hebt.
3. Klik vervolgens op Ok. Op dit moment zijn alle geselecteerde cellen gemaskeerd.
Vink Geen, de cellen tonen een reeks onzin.
Vink Karakter optie aan, u kunt elk karakter in het tekstvak typen, waarna de cellen alleen dat karakter weergeven.
Vink Tekst optie aan, typ vervolgens de tekst die u wilt dat de cellen weergeven.
Tip: als u de cellen wilt decoderen of de celinhoud wilt weergeven, kunt u klikken op Kutools Plus > Cellen Decoderen, typ vervolgens het wachtwoord om succesvol te decoderen.
Rijen verbergen op basis van waarde
Deze handleiding biedt enkele methoden om rijen te verbergen op basis van de waarde (gelijk aan/groter dan/kleiner dan) in een andere kolom in Excel.
Deel van de tekstreeks verbergen
Soms wilt u mogelijk een deel van de tekstreeks verbergen om privé-informatie te beschermen, zoals telefoonnummer 123-xxx-xxxx, hoe doet u dat? In dit artikel vindt u eenvoudige oplossingen.
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen