Tässä artikkelissa kuvataan, miten muotoilu a solu kuten teksti käyttämällä VBA koodi Excel 3:lla eri menetelmällä. Apuna käytetään Teksti ja Muotoilutoiminnot ja Valikoima . NumberFormat omaisuus voimme asettaa numeromuoto-koodin, jolla solun arvo voidaan muuntaa tekstiksi helposti. Tutustutaan esimerkkeihin ja sovelletaan näitä tekniikoita.

Lataa harjoituskirja

Lataa tämä harjoituskirja, jotta voit harjoitella tätä artikkelia lukiessasi.

3 sopivaa tapaa muotoilla solu tekstiksi VBA: n avulla Excelissä

Tässä osassa näytämme, miten voimme muotoilla solun tekstiksi VBA:n avulla Excelissä. Ensin meidän on kuitenkin tiedettävä, miten Visual Basic Editor -ikkuna avataan Excelissä.

Kirjoita koodia Visual Basic Editorissa

Seuraa vaiheet osoitteeseen avoin ... visuaalinen perus editori ja kirjoita sinne koodia.

• Mene osoitteeseen Kehittäjä välilehdeltä Excel-nauha .
• Klikkaa ... Visual Basic -vaihtoehto.

• Vuonna Visual Basic for Applications ikkunassa, napsauta Lisää pudotusvalikko osoitteeseen valitse ... Uusi moduuli

Nyt kun uusi moduuli on avattu , kirjoita sinne koodia ja paina F5 osoitteeseen juosta.

1. Range.NumberFormat-ominaisuuden käyttö solun muotoilemiseksi tekstiksi

Tässä esimerkissä käytämme Range.NumberFormat-ominaisuus meidän VBA-koodi osoitteeseen muotoilu a solu kuten teksti Alla olevassa kuvakaappauksessa solussa C5 meillä on lyhyt päivämäärä että aiomme muutos kuten teksti .

Visual Basic -editorissa kopioi ja liitä seuraavat koodi .

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

Paina nyt F5 osoitteeseen ajaa koodi.

Tässä näemme lyhyt päivämäärä muotoiltu solu on muuttunut a tekstiarvo .

Koodi Selitys:

• Käytimme Range Object osoitteeseen valitse ... solu laskentataulukossa, jotka sisältävät syöttö
• Osoitteeseen muotoilu ... syöttöarvo kuten teksti , meidän on laitettava NumberFormat arvo kuten "@".

Vastaavasti, soveltamalla samaa koodinpätkää voimme muuttaa eri numeroformaatit osoitteeseen teksti .

Lue lisää: Kuinka muotoilla solu ja keskittää teksti Excel VBA: lla (5 tapaa)

Samanlaisia lukemia

• Koko arkin kirjasinkoon muuttaminen Excel VBA: lla
• Kuinka kirjoittaa 001 Excelissä (11 tehokasta menetelmää)
• Tekstin kohdistaminen VBA-komentopainikkeella Excelissä (5 menetelmää)
• Kuinka lisätä tekstiä numeron jälkeen mukautetun muotoilun Excelissä (4 tapaa)
• Kuinka suuraakkoset kirjoitetaan jokaisen sanan ensimmäisellä kirjaimella Excelissä (4 tapaa)

2. Viittaus TEXT-funktioon VBA-koodissa solun muotoilemiseksi tekstiksi

The T EXT toiminto Excelissä on työarkkitehtitoiminto että muuntaa a numeerinen arvo tai string a määritetty muoto . Vaikka se on ei a VBA-toiminto , voimme käyttää sitä viittaamalla a Taulukkolaskentaohjelman toiminto Objekti osoitteeseen muotoilu a solu osoitteeseen teksti Sanotaan, että meillä on Pitkä päivämäärä osoitteessa solu B6 että haluamme muotoilu kuten teksti .

Laita seuraava koodi vuonna visuaalinen perus editori tämän toteuttamiseksi.

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

By käynnissä koodi käyttämällä F5 muunnettu ... pitkä päivä a:ksi teksti arvoa. Samoin voimme muotoilla solun, joka sisältää arvon eri numeroformaatit osoitteeseen teksti .

Koodi Selitys:

• Käytimme Range Object osoitteeseen valitse ... solut työarkissa, jotka sisältävät syöttö ja lähtöarvot.
• The WorksheetFunction-objekti ansiosta pystyimme käyttämään TEXT-toiminto osoitteessa VBA-koodi .
• The TEXT-toiminto tarvitsee 2 argumenttia...

arvo - the... syöttösoluviite (tässä esimerkissä B6 ).

format_text- käytimme " ' 0 " osoitteeseen Muunna ... arvo osoitteeseen tekstimuoto.

Lue lisää: Kuinka muotoilla tekstiä Excel-solussa (10 lähestymistapaa)

3. VBA-muotoilutoiminnon käyttö solun muotoilemiseksi tekstiksi Excelissä

The Muotoilutoiminto on yksi muuntotoiminnot VBA Excelissä. Tämä palauttaa muotoiltu lauseke perustuu muotoilu joka on määritetty kuten toinen argumentti of the toiminto Tässä esimerkissä käytetään seuraava koodi me himoittu a Pitkä päivämäärä solussa C5 a teksti .

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

Koodi Selitys:

• Käytimme Range Object osoitteeseen valitse ... solut työarkissa, jotka sisältävät syöttö ja lähtöarvot.
• The Muotoilutoiminto tarvitsee 2 argumenttia...

ilmaisu - the... syöttösoluviite (tässä esimerkissä B6 ).

format- käytimme " ' 0 " osoitteeseen Muunna ... arvo osoitteeseen tekstimuoto.

Vaihtoehtoinen koodi:

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

Lue lisää: Kuinka muotoilla tekstiä Excelin ensimmäisen kirjaimen suuraakkoseksi (10 tapaa)

Huomautukset

• Lisäsimme yksinkertainen lainausmerkki ( ' ) ennen nolla syöttääksesi numeron muotoinen koodi kuten " ' 0 " vuonna Teksti ja Muotoilutoimintojen argumentti osoitteeseen muotoilu a solu a tekstiarvo.
• Osoitteeseen katso ... koodi liittyy kolmeen eri menetelmään, klikkaa ... oikea painike on arkin nimi ja valitse ... Näytä koodivaihtoehto.

Päätelmä

Nyt tiedämme, miten solu muotoillaan tekstiksi VBA-koodin avulla Excelissä 3 eri esimerkin avulla. Toivottavasti se auttaa sinua käyttämään näitä menetelmiä varmemmin. Jos sinulla on kysyttävää tai ehdotuksia, älä unohda laittaa niitä alla olevaan kommenttikenttään.