Excel VBA: vormindage lahter tekstina (3 meetodit)

Hugh West

06-06-2023 Makros &; Excel VBA
  • Jaga Seda
Hugh West

See artikkel näitab, kuidas formaat a rakk nagu tekst kasutades VBA koodi sisse Excel 3 erineva meetodi abil. Tänu Tekst ja Vormingu funktsioonid ja Range . NumberFormat kinnisvara , saame määrata numbrivormingu koodi, et teisendada lahtri väärtus hõlpsasti tekstiks. Sukeldume näidetesse ja rakendame neid tehnikaid.

Lae alla praktiline töövihik

Lae alla see harjutusvihik, et seda artiklit lugedes harjutada.

Vormäära lahtrit tekstina.xlsm

3 sobivat meetodit lahtri vormindamiseks tekstina VBA abil Excelis

Selles jaotises näitame, kuidas me saame Exceli VBA abil lahtrit tekstina vormindada. Kuid kõigepealt peame teadma, kuidas avada Exceli visual basic redaktori aken.

Koodi kirjutamine Visual Basic'i redaktoris

Järgige sammud aadressile avatud . Visual Basic toimetaja ja kirjutage sinna koodi.

  • Minge Arendaja vahekaart Exceli lint .
  • Klõpsake . Visual Basic valik.

  • In the Visual Basic rakenduste jaoks aknas, klõpsake nuppu Sisesta rippmenüü aadressile valige . Uus moodul

Nüüd, kui uus moodul on avatud , kirjutage sinna kood ja vajutage F5 aadressile joosta.

1. Range.NumberFormat omaduse kasutamine lahtri vormindamiseks tekstina

Selles näites kasutame me Range.NumberFormat omadus meie VBA kood aadressile formaat a rakk nagu tekst Allpool esitatud ekraanipildil on lahtris C5 meil on lühike kuupäev et me läheme muuta nagu tekst .

Nüüd, visual basic redaktoris koopia ja paste järgmine kood . 

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

Nüüd vajutage F5 aadressile käivitada kood.

Siin näeme lühike kuupäev vormindatud lahter on muudetud et teksti väärtus .

Koodi selgitus:

  • Me kasutasime Vahemiku objekt aadressile valige . rakk töölehel, mis sisaldavad sisend
  • aadressile formaat . sisendväärtus nagu tekst , peame panema NumberFormat väärtus nagu "@".

Samamoodi saame sama kooditükki rakendades muuta erinevad numbriformaadid aadressile tekst .

Loe edasi: Kuidas vormindada lahtrit ja keskmistada teksti Exceli VBA-ga (5 võimalust)

Sarnased lugemised

  • Kuidas muuta kogu lehe kirjasuurust Exceli VBAga
  • Kuidas kirjutada 001 Excelis (11 tõhusat meetodit)
  • Teksti joondamine VBA käsunupuga Excelis (5 meetodit)
  • Kuidas lisada teksti pärast numbrit Exceli kohandatud vorminguga (4 võimalust)
  • Kuidas Exceli iga sõna esimese tähe suurtähtede kirjutamine (4 võimalust)

2. Viitavad TEXT funktsiooni VBA koodis, et vormindada lahtrit tekstina

The T EXT funktsioon Excelis on töölehe funktsioon et Teisendab a numbriline väärtus või string et kindlaksmääratud vorming . kuigi see on mitte a VBA funktsioon , saame seda kasutada, viidates Tööleht Funktsiooni objekt aadressile formaat a rakk aadressile tekst Ütleme, et meil on Pikk kuupäev aadressil rakk B6 et me tahame formaat nagu tekst .

Pane järgmine kood aastal Visual Basic toimetaja selle saavutamiseks. 

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

Autor töötab kood, kasutades F5 teisendatud . pikk kuupäev arvesse tekst väärtus. Samamoodi saame vormindada lahtri, mis sisaldab erinevad numbriformaadid aadressile tekst .

Koodi selgitus:

  • Me kasutasime Vahemiku objekt aadressile valige . rakud töölehel, mis sisaldavad sisend ja väljundväärtused.
  • The WorksheetFunction objekt võimaldas meil kasutada TEXT funktsioon aadressil VBA kood .
  • The TEXT funktsioon vajab 2 argumenti -

väärtus - the... sisendkambri viide (selles näites B6 ).

format_text- me kasutasime " ' 0 " aadressile teisendada . väärtus aadressile tekstivorming.

Loe edasi: Kuidas vormindada teksti Exceli lahtris (10 lähenemisviisi)

3. VBA vormingu funktsiooni kasutamine Exceli lahtri vormindamiseks tekstina

The Formaatimisfunktsioon on üks konverteerimisfunktsioonid VBA Excelis. See tagastab vormindatud väljendus põhineb formaat mis on täpsustatud kui teine argument kohta funktsioon Selles näites, kasutades järgmine kood me ihaldatud a Pikk kuupäev lahtris C5 et tekst . 

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

Koodi selgitus:

  • Me kasutasime Vahemiku objekt aadressile valige . rakud töölehel, mis sisaldavad sisend ja väljundväärtused.
  • The Formaatimisfunktsioon vajab 2 argumenti -

väljendus - the... sisendkambri viide (selles näites B6 ).

formaat - me kasutasime " ' 0 " aadressile teisendada . väärtus aadressile tekstivorming.

Alternatiivne kood: 

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

Loe edasi: Kuidas vormindada teksti Exceli esimese tähe suurtäheks (10 võimalust)

Märkused

  • Me lisasime ühekordne jutumärk ( ' ) enne null siseneda numbri vormingu kood nagu " ' 0 " aastal Tekst ja Formaatfunktsioonide argument aadressile formaat a rakk et teksti väärtus.
  • aadressile vaadata . kood seotud 3 erineva meetodiga, kliki . parem nupp kohta lehe nimi ja valige . Vaata koodi valikut.

Kokkuvõte

Nüüd teame, kuidas vormindada lahtrit tekstina kasutades VBA koodi Excelis 3 erineva näite abil. Loodetavasti aitab see teil neid meetodeid kindlamalt kasutada. Kui teil on küsimusi või ettepanekuid, ärge unustage neid allpool olevasse kommentaarikasti panna.

Eelmine postitus Kuidas kasutada TRUE-funktsiooni Excelis (10 ideaalset näidet)
Järgmine postitus Kuidas redigeerida Pivot-tabelit Excelis (5 meetodit)

Hugh West on suurte kogemustega Exceli koolitaja ja analüütik, kellel on selles valdkonnas üle 10-aastane kogemus. Tal on raamatupidamise ja rahanduse bakalaureusekraad ning ärijuhtimise magistrikraad. Hugh’l on kirg õpetamise vastu ning ta on välja töötanud ainulaadse õpetamisviisi, mida on lihtne järgida ja mõista. Tema Exceli ekspertteadmised on aidanud tuhandetel õpilastel ja spetsialistidel üle maailma oma oskusi parandada ja karjääris silma paista. Oma ajaveebi kaudu jagab Hugh oma teadmisi maailmaga, pakkudes tasuta Exceli õpetusi ja veebikoolitusi, mis aitavad üksikisikutel ja ettevõtetel oma potentsiaali täielikult ära kasutada.