VBA - vormindage numbrid sotsiaalkindlustuse numbriteks

Anonim

Ameerika Ühendriikides on sotsiaalkindlustuse number (SSN) üheksakohaline number, mis antakse välja USA kodanikele, alalistele elanikele ja ajutistele (töötavatele) elanikele. Numbri annab üksikisikule välja Ameerika Ühendriikide valitsuse sõltumatu amet, sotsiaalkindlustusamet. Kuigi selle peamine eesmärk on üksikisikute jälgimine sotsiaalkindlustuse eesmärgil, on sotsiaalkindlustuse numbrist saanud de facto riiklik identifitseerimisnumber maksustamisel ja muudel eesmärkidel.

Kui saate töötajate loendeid, kus sotsiaalkindlustuse numbrid (SSN) pole samas vormingus, st mõned on tekst-, numbrilised ja üldised või võivad olla kriipsud. Kriipsude eemaldamiseks võite kasutada lihtsalt käsku Otsi ja asenda või kiirklahvi CTRL + H.

Saate numbri vormistada sotsiaalkindlustuse numbriks. Näiteks saate vormindada üheksakohalise numbri 123456789 numbrina 123-45-6789.

Selles artiklis õpime, kuidas teisendada numbreid SSN -vormingus VBA -koodi abil.

Küsimus: Mul on sotsiaalkindlustuse numbrite loend ja ma tahan need kõik VBA-koodi kasutades teisendada antud vormingusse: (000-00-0000).

Numbrite SSN -vormingusse teisendamiseks peame VB redaktori käivitamiseks järgima järgmisi samme:

  • Klõpsake vahekaarti Arendaja
  • Valige koodigrupist Visual Basic

  • Kopeerige allolev kood standardmoodulisse
Sub SSN_Format () Dim r As Range Application.ScreenUpdating = False With Range ("A1"). CurrentRegion Iga r In .Cells With r .Value = Application.Text (.Value, "000-00-0000") End with Järgmine r Lõpetage rakendusega. ScreenUpdating = True End Sub 

  • Käivitame makro ja saame SSN -i vajalikus vormingus; vaadake allolevat pilti:

Järeldus: Sel viisil saame kasutada Exceli vormingu funktsiooni, et kuvada sotsiaalkindlustuse numbrid õiges vormingus.

Kui teile meeldisid meie ajaveebid, jagage seda oma sõpradega Facebookis. Samuti saate meid jälgida Twitteris ja Facebookis.
Tahaksime sinust kuulda, andke meile teada, kuidas saaksime oma tööd täiustada, täiendada või uuendada ning muuta see teie jaoks paremaks. Kirjuta meile meilisaidile