Excel VBA: formatēt šūnas kā tekstu (3 metodes)

Hugh West

06-06-2023 Makroprogrammas & amp; Excel VBA
  • Dalīties Ar Šo
Hugh West

Šajā rakstā ir parādīts, kā formāts a šūna kā teksts izmantojot VBA kods Excel ar 3 dažādām metodēm. Izmantojot Teksts un Formāta funkcijas , un Diapazons . NumberFormat īpašums , mēs varam iestatīt ciparu formāta kodu, lai viegli pārvērstu šūnas vērtību tekstā. Iegremdēsimies piemēros un piemērosim šīs metodes.

Lejupielādēt Practice Workbook

Lejupielādējiet šo prakses darba burtnīcu, lai vingrinātos, kamēr lasāt šo rakstu.

Formatēt šūnas kā Text.xlsm

3 piemērotas metodes, lai formatētu šūnas kā tekstu, izmantojot VBA programmā Excel

Šajā sadaļā mēs parādīsim, kā mēs varam formatēt šūnas kā tekstu, izmantojot VBA programmā Excel. Bet vispirms mums jāzina, kā atvērt vizuālā pamata redaktora logu programmā Excel.

Koda rakstīšana programmā Visual Basic Editor

Sekojiet soļi uz atvērts . Visual Basic redaktors un uzrakstiet tajā kodu.

  • Dodieties uz Izstrādātājs cilnē Excel lente .
  • Noklikšķiniet uz . Visual Basic opcija.

  • In the Visual Basic lietojumprogrammām logā noklikšķiniet uz Ievietot nolaižamo logu uz atlasīt . Jauns modulis

Tagad, kad jauns modulis ir . atvērts , uzrakstiet tur kodu un nospiediet F5 uz palaist.

1. Range.NumberFormat īpašības izmantošana, lai formatētu šūnu kā tekstu

Šajā piemērā mēs izmantosim Range.NumberFormat īpašība mūsu VBA kods uz formāts a šūna kā teksts Zemāk redzamajā ekrānšāviņas attēlā šūnā C5 mums ir īss datums ka mēs gatavojamies mainīt kā teksts .

Tagad Visual Basic redaktorā kopēt un ielīmēt šādus elementus. kods . 

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

Tagad nospiediet F5 uz palaist kodu.

Šeit mēs varam redzēt īss datums formatēta šūna ir mainīts uz teksta vērtība .

Koda skaidrojums:

  • Mēs izmantojām Diapazona objekts uz atlasīt . šūna darblapā, kurā ir ievades
  • Uz formāts . ievades vērtība kā teksts , mums ir jāieliek NumberFormat vērtība kā "@".

Līdzīgi, izmantojot to pašu kodu, mēs varam mainīt dažādi numuru formāti uz teksts .

Lasīt vairāk: Kā formatēt šūnas un centrēt tekstu ar Excel VBA (5 veidi)

Līdzīgi lasījumi

  • Kā mainīt visas lapas fonta lielumu, izmantojot Excel VBA
  • Kā rakstīt 001 programmā Excel (11 efektīvas metodes)
  • Teksta izlīdzināšana ar VBA komandas pogu programmā Excel (5 metodes)
  • Kā pievienot tekstu pēc numura ar pielāgotu formātu programmā Excel (4 veidi)
  • Kā Excel programmā Excel rakstīt katra vārda pirmo burtu ar lielo burtu (4 veidi)

2. Atsauce uz TEXT funkciju VBA kodā, lai formatētu šūnu kā tekstu

Portāls T EXT funkcija programmā Excel ir darblapas funkcija ka konvertē a skaitliskā vērtība vai virkne uz norādītais formāts . Lai gan tas ir ne a VBA funkcija , mēs to varam izmantot, atsaucoties uz Darblapas funkciju objekts uz formāts a šūna uz teksts Pieņemsim, ka mums ir Garais datums vietnē šūna B6 ka mēs vēlamies formāts kā teksts .

Ievietojiet šāds kods in the Visual Basic redaktors lai to paveiktu. 

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

Līdz darbojas kodu, izmantojot F5 pārveidots . ilgs datums uz teksts Līdzīgi mēs varam formatēt šūnas, kas satur dažādi numuru formāti uz teksts .

Koda skaidrojums:

  • Mēs izmantojām Diapazona objekts uz atlasīt . šūnas darblapā, kurā ir ievades un izejas vērtības.
  • Portāls Objekts WorksheetFunction ļāva mums izmantot TEXT funkcija vietnē VBA kods .
  • Portāls TEXT funkcija nepieciešams 2 argumenti -

vērtība - un... ieejas šūnas atsauce (šajā piemērā B6 ).

format_text- mēs izmantojām " ' 0 " uz konvertēt . vērtība uz teksta formāts.

Lasīt vairāk: Kā formatēt tekstu Excel šūnā (10 pieejas)

3. VBA formatēšanas funkcijas izmantošana, lai formatētu šūnas kā tekstu programmā Excel

Portāls Formāta funkcija ir viens no konversijas funkcijas VBA programmā Excel. Tas atgriež formatēta izteiksme pamatojoties uz formāts tas ir norādīts kā otrais arguments no funkcija . Šajā piemērā, izmantojot šāds kods mēs kāroto a Garais datums šūnā C5 uz teksts . 

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

Koda skaidrojums:

  • Mēs izmantojām Diapazona objekts uz atlasīt . šūnas darblapā, kurā ir ievades un izejas vērtības.
  • Portāls Formāta funkcija nepieciešams 2 argumenti -

izteiksme - un... ieejas šūnas atsauce (šajā piemērā B6 ).

formāts - mēs izmantojām " ' 0 " uz konvertēt . vērtība uz teksta formāts.

Alternatīvais kods: 

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

Lasīt vairāk: Kā formatēt tekstu ar lielo sākuma burtu programmā Excel (10 veidi)

Piezīmes

  • Mēs pievienojām viens pēdiņš ( " ) pirms nulle lai ievadītu numura formāta kods kā " ' 0 " in the Teksts un Formāta funkcijas arguments uz formāts a šūna uz teksta vērtība.
  • Uz skatīt . kods saistītas ar 3 dažādām metodēm, noklikšķiniet uz . labā poga par lapas nosaukums un atlasīt . Skatīt koda opciju.

Secinājums

Tagad mēs zinām, kā formatēt šūnas kā tekstu, izmantojot VBA kodu programmā Excel, izmantojot 3 dažādus piemērus. Cerams, ka tas palīdzēs jums pārliecinošāk izmantot šīs metodes. Jebkādus jautājumus vai ieteikumus neaizmirstiet uzdot komentāru laukā zemāk.

Iepriekšējais ieraksts Kā lietot TRUE funkciju programmā Excel (10 ideāli piemēri)
Nākamais ieraksts Kā rediģēt šarnīra tabulu programmā Excel (5 metodes)

Hjū Vests ir ļoti pieredzējis Excel treneris un analītiķis ar vairāk nekā 10 gadu pieredzi šajā nozarē. Viņam ir bakalaura grāds grāmatvedībā un finansēs un maģistra grāds uzņēmējdarbības vadībā. Hjū aizraujas ar mācīšanu, un viņš ir izstrādājis unikālu mācīšanas pieeju, kas ir viegli izpildāma un saprotama. Viņa ekspertu zināšanas programmā Excel ir palīdzējušas tūkstošiem studentu un profesionāļu visā pasaulē uzlabot savas prasmes un izcelties karjerā. Izmantojot savu emuāru, Hjū dalās savās zināšanās ar pasauli, piedāvājot bezmaksas Excel apmācības un tiešsaistes apmācību, lai palīdzētu personām un uzņēmumiem pilnībā izmantot savu potenciālu.