Přejít k hlavnímu obsahu

Jak zobrazit pouze poslední 4 číslice čísla sociálního zabezpečení (ssn) v aplikaci Excel?

Kvůli zachování soukromí čísla sociálního zabezpečení má mnoho uživatelů aplikace Excel tendenci zobrazovat pouze poslední 4 číslice čísla ssn v aplikaci Excel. Tento článek vám ukáže způsoby, jak skrýt všechna čísla čísla ssn kromě posledních 4 číslic v aplikaci Excel.

Zobrazit pouze poslední 4 číslice ssn se vzorcem
Zobrazit pouze poslední 4 číslice ssn s kódem VBA
Smažte všechny číslice ssn kromě posledních 4 číslic pomocí Kutools pro Excel


Zobrazit pouze poslední 4 číslice ssn se vzorcem

Následující vzorec vám pomůže zobrazit pouze poslední 4 číslice ssn v aplikaci Excel. Postupujte prosím následovně.

1. Vyberte prázdnou buňku a zadejte vzorec =RIGHT(A2,4) do řádku vzorců a poté stiskněte vstoupit klíč. Viz snímek obrazovky:

Poznámka: Ve vzorci je A2 buňka obsahující číslo sociálního zabezpečení.

2. Pokračujte ve výběru první buňky výsledků, přetažením rukojeti výplně dolů zobrazte všechny výsledky, jak ukazuje následující snímek obrazovky.


Snadno smažte všechny číslice ssn kromě posledních 4 číslic v aplikaci Excel:

S Odebrat podle polohy užitečnost Kutools pro Excel, můžete odstranit všechny číslice ssn kromě posledních 4 číslic, jak je uvedeno níže.
Stáhněte si a vyzkoušejte to hned! (30denní bezplatná trasa)


Zobrazit pouze poslední 4 číslice ssn s kódem VBA

Následující kód VBA vám pomůže automaticky zobrazit pouze poslední 4 číslice při zadávání čísla sociálního zabezpečení. Postupujte prosím následovně.

1. V listu, který chcete zobrazit pouze poslední 4 číslice čísla sociálního zabezpečení, klikněte pravým tlačítkem na kartu listu a klikněte na Zobrazit kód z nabídky pravého tlačítka myši. Viz screenshot:

2. V Microsoft Visual Basic pro aplikace zkopírujte níže uvedený kód VBA do okna Kód.

Kód VBA: Zobrazit pouze poslední 4 číslice čísla sociálního zabezpečení v aplikaci Excel

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim I As Long
    Dim xVal As String
    On Error Resume Next
    If Intersect(Target, Range("A:A")) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    For I = 1 To Target.Count
        If Len(Target(I).Text) >= 4 Then
            Target(I).Value = Right(Target(I).Value, 4)
        End If
    Next
    Application.EnableEvents = True
End Sub

Poznámka: V kódu je A:A sloupec, do kterého zadáte číslo sociálního pojištění. Změňte jej podle potřeby.

3. zmáčkni Další + Q klávesy pro opuštění Microsoft Visual Basic pro aplikace okno.

Od této chvíle se při zadávání rodného čísla do buněk ve sloupci A automaticky skryjí všechny číslice kromě posledních 4 čísel.


Smažte všechny číslice ssn kromě posledních 4 číslic pomocí Kutools pro Excel

Z čísla sociálního pojištění můžete odstranit všechna čísla kromě posledních 4 číslic s Odebrat podle polohy užitečnost Kutools pro Excel. Postupujte prosím následovně.

Před aplikací Kutools pro Excel, Prosím nejprve si jej stáhněte a nainstalujte.

1. Vyberte všechny buňky obsahující čísla sociálního pojištění a poté klepněte Kutools > Text > Odebrat podle polohy

2. V Odebrat podle polohy dialogové okno vyberte Zleva možnost v Pozice určete, jak čísla odstraníte zleva v Čísla pole (zde zadávám číslo 7) a poté klikněte na OK knoflík. Viz screenshot:

Poté se z vybraných buněk odstraní všechna čísla kromě posledních 4 číslic.

  Pokud chcete mít bezplatnou (30denní) zkušební verzi tohoto nástroje, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.

Nejlepší nástroje pro produktivitu v kanceláři

Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

karta kte 201905


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations