VBA - Formatirajte brojeve kao brojeve socijalnog osiguranja

Anonim

U Sjedinjenim Državama broj socijalnog osiguranja (SSN) je deveteroznamenkasti broj koji se izdaje građanima SAD-a, stalnim stanovnicima i privremenim (radnim) stanovnicima. Broj pojedincu izdaje Uprava za socijalno osiguranje, neovisna agencija vlade Sjedinjenih Država. Iako je njegova primarna svrha praćenje pojedinaca u svrhe socijalnog osiguranja, broj socijalnog osiguranja postao je de facto nacionalni identifikacijski broj za oporezivanje i druge svrhe.

Ako primate popise zaposlenika gdje brojevi socijalnog osiguranja (SSN) nisu u istom formatu, tj. Neki su tekstualni, numerički i općeniti ili mogu imati crtice. Da biste uklonili crtice, jednostavno upotrijebite naredbu Pronađi i zamijeni ili tipku prečaca CTRL + H.

Broj možete formatirati kao broj socijalnog osiguranja. Na primjer, možete formatirati 9-znamenkasti broj, 123456789 kao 123-45-6789.

U ovom ćemo članku naučiti kako pretvoriti brojeve u SSN formatu pomoću VBA koda.

Pitanje: Imam popis broja socijalnog osiguranja i želim ih sve pretvoriti u zadani format: (000-00-0000), koristeći VBA kôd.

Da bismo pretvorili brojeve u SSN format, moramo slijediti korake u nastavku za pokretanje VB uređivača:

  • Kliknite karticu Developer
  • Iz grupe kodova odaberite Visual Basic

  • Kopirajte donji kod u standardni modul
Sub SSN_Format () Dim r As Range Application.ScreenUpdating = False With Range ("A1"). CurrentRegion for each r In .Cells With r .Value = Application.Text (.Value, "000-00-0000") End with Sljedeće r Završi s aplikacijom.ScreenUpdating = True End Sub 

  • Pokrenut ćemo makro i dobit ćemo SSN u potrebnom formatu; pogledajte donji snimak:

Zaključak: Na ovaj način možemo upotrijebiti značajku Excel formata za prikaz brojeva socijalnog osiguranja u pravilnom oblikovanju.

Ako vam se sviđaju naši blogovi, podijelite ih sa svojim prijateljima na Facebooku. Također nas možete pratiti na Twitteru i Facebooku.
Voljeli bismo čuti vaše mišljenje, javite nam kako možemo poboljšati, nadopuniti ili inovirati svoj rad i učiniti ga boljim za vas. Pišite nam na web stranici e -pošte