Excel VBA: Formater celle som tekst (3 metoder)

Hugh West

06-06-2023 Makroer & Excel VBA
  • Del Dette
Hugh West

Denne artikel illustrerer, hvordan man format a celle som tekst ved hjælp af VBA kode i Excel med 3 forskellige metoder. Ved hjælp af den Tekst og Formatfunktioner , og den Område . NumberFormat ejendom kan vi indstille koden for talformatet for nemt at konvertere en celleværdi til tekst. Lad os dykke ned i eksemplerne og anvende disse teknikker.

Download arbejdsbog til øvelser

Download denne arbejdsbog til træning, så du kan øve dig, mens du læser denne artikel.

Formater celle som tekst.xlsm

3 egnede metoder til at formatere celle som tekst ved hjælp af VBA i Excel

I dette afsnit vil vi demonstrere, hvordan vi kan formatere celler som tekst ved hjælp af VBA i Excel. Men først skal vi vide, hvordan vi åbner Visual Basic Editor-vinduet i Excel.

Skriv kode i Visual Basic Editor

Følg den trin til åben visual basic editor og skrive noget kode der.

  • Gå til Udvikler fra fanen Excel-bånd .
  • Klik på Visual Basic-indstilling.

  • I den Visual Basic for Applications vindue, skal du klikke på Indsæt dropdown til Vælg Nyt modul

Nu, hvor en nyt modul er åbnet , skriv noget kode der, og tryk på F5 til køre.

1. Brug af egenskaben Range.NumberFormat til at formatere celle som tekst

I dette eksempel bruger vi Egenskaben Range.NumberFormat i vores VBA-kode til format a celle som tekst I skærmbilledet nedenfor, i celle C5 har vi en kort dato at vi vil ændre som tekst .

Nu, i Visual Basic-editoren kopi og indsætte følgende kode . 

 Sub FormatCellAsText() Range("C5").NumberFormat = "@" End Sub

Tryk nu på F5 til køre koden.

Her kan vi se den kort dato formateret celle er ændret til en tekstværdi .

Kodeforklaring:

  • Vi har brugt den Område Objekt til Vælg celle i det regneark, der indeholder input
  • Til format inputværdi som tekst , skal vi sætte den NumberFormat værdi som "@".

På samme måde kan vi ved at anvende det samme stykke kode ændre forskellige nummerformater til tekst .

Læs mere: Sådan formaterer du celle og centrerer tekst med Excel VBA (5 måder)

Lignende læsninger

  • Sådan ændres skriftstørrelsen for hele arket med Excel VBA
  • Sådan skriver du 001 i Excel (11 effektive metoder)
  • Justering af tekst med VBA-kommandoknappen i Excel (5 metoder)
  • Sådan tilføjes tekst efter tal med brugerdefineret format i Excel (4 måder)
  • Sådan skrives det første bogstav i hvert ord i Excel med stort bogstav (4 måder)

2. Henvis til TEXT-funktionen i en VBA-kode for at formatere celle som tekst

T EXT funktion i Excel er en regnearksfunktion at konverterer a numerisk værdi eller streng til en specificeret format . Selv om det er ikke a VBA-funktion kan vi bruge den ved at henvise til en Arbejdsark Funktionsobjekt til format a celle til tekst Lad os sige, at vi har en Lang dato på celle B6 at vi ønsker at format som tekst .

Sæt den følgende kode i den visual basic editor til at opnå dette. 

 Sub FormatCellAsText() Range("C6") = WorksheetFunction.Text(Range("B6"), "'0") End Sub

Af kører koden ved at bruge F5 konverteret lang dato til en tekst På samme måde kan vi formatere en celle, der indeholder forskellige nummerformater til tekst .

Kodeforklaring:

  • Vi har brugt den Område Objekt til Vælg celler i regnearket, der indeholder input og outputværdier.
  • WorksheetFunction-objekt gjorde det muligt for os at bruge TEXT-funktion på VBA-kode .
  • TEXT-funktion har brug for 2 argumenter-

værdi - den reference til inputcellen (i dette eksempel B6 ).

format_text- vi brugte " ' 0 " til konvertere værdi til tekstformat.

Læs mere: Sådan formateres tekst i Excel-celle (10 fremgangsmåder)

3. Brug af VBA-formatfunktionen til at formatere celle som tekst i Excel

Formatfunktion er en af de konverteringsfunktioner i VBA Excel. Dette returnerer en formateret udtryk baseret på den format det vil sige specificeret som den andet argument af den funktion . I dette eksempel er det ved hjælp af følgende kode vi eftertragtede a Lang dato i celle C5 til en tekst . 

 Sub FormatCellAsText() Range("C6").Value = Format(Range("B6").Value, "'0") End Sub

Kodeforklaring:

  • Vi har brugt den Område Objekt til Vælg celler i regnearket, der indeholder input og outputværdier.
  • Formatfunktion har brug for 2 argumenter-

udtryk - den reference til inputcellen (i dette eksempel B6 ).

format- vi brugte " ' 0 " til konvertere værdi til tekstformat.

Alternativ kode: 

 Sub FormatCellAsText() Range("C6").Value = " ' ' " & Format(Range("B6").Value, "0") End Sub

Læs mere: Sådan formaterer du tekst til stort begyndelsesbogstav i Excel (10 måder)

Noter

  • Vi har tilføjet en enkelt anførselstegn ( ' ) før nul for at komme ind i nummer format kode som " ' 0 " i den Tekst og Formatfunktioner argument til format a celle til en tekstværdi.
  • Til se kode i forbindelse med 3 forskellige metoder, klik højre knap på den navn på arket og Vælg Vis kode mulighed.

Konklusion

Nu ved vi, hvordan man formaterer en celle som tekst ved hjælp af VBA-kode i Excel med 3 forskellige eksempler. Forhåbentlig vil det hjælpe dig med at bruge disse metoder mere sikkert. Eventuelle spørgsmål eller forslag glem ikke at skrive dem i kommentarfeltet nedenfor.

Forrige indlæg Sådan bruger du TRUE-funktionen i Excel (10 ideelle eksempler)
Næste indlæg Sådan redigerer du en pivottabel i Excel (5 metoder)

Hugh West er en meget erfaren Excel-træner og analytiker med over 10 års erfaring i branchen. Han har en bachelorgrad i regnskab og finans og en kandidatgrad i Business Administration. Hugh har en passion for undervisning og har udviklet en unik undervisningstilgang, der er nem at følge og forstå. Hans ekspertviden om Excel har hjulpet tusindvis af studerende og fagfolk verden over med at forbedre deres færdigheder og udmærke sig i deres karriere. Gennem sin blog deler Hugh sin viden med verden og tilbyder gratis Excel-tutorials og onlinetræning for at hjælpe enkeltpersoner og virksomheder med at nå deres fulde potentiale.