Excel VBA: Formatuj komórkę jako tekst (3 metody)

Hugh West

06-06-2023 Makra & Excel VBA
  • Udostępnij To
Hugh West

Ten artykuł ilustruje, jak format a komórka jako tekst używając VBA kod w Excel za pomocą 3 różnych metod. Z pomocą Tekst oraz Funkcje formatu , oraz Zakres . NumberFormat nieruchomość , możemy ustawić kod formatu liczby, aby łatwo przekonwertować wartość komórki na tekst. Zanurzmy się w przykładach i zastosujmy te techniki.

Pobierz Zeszyt ćwiczeń

Pobierz ten zeszyt ćwiczeń, aby ćwiczyć podczas czytania tego artykułu.

Formatuj komórki jako tekst.xlsm

3 Odpowiednie metody formatowania komórek jako tekstu za pomocą VBA w Excelu

W tym rozdziale zademonstrujemy, jak możemy sformatować komórkę jako tekst za pomocą VBA w Excelu. Ale najpierw musimy wiedzieć, jak otworzyć okno edytora Visual Basic w Excelu.

Napisz kod w edytorze Visual Basic

Podążaj za kroki do otwórz the edytor visual basic i napisać tam jakiś kod.

  • Idź do Deweloper zakładka z Wstążka programu Excel .
  • Kliknij the Opcja Visual Basic.

  • W Visual Basic for Applications kliknij przycisk Wstawianie rozwijania do wybierz the Nowy moduł

Teraz, gdy nowy moduł jest otwarty , wpisz tam jakiś kod i naciśnij F5 do bieg.

1. Wykorzystanie właściwości Range.NumberFormat do formatowania komórki jako tekstu

W tym przykładzie użyjemy Właściwość Range.NumberFormat w naszym Kod VBA do format a komórka jako tekst Na poniższym zrzucie ekranu, w komórce C5 mamy krótka data że zamierzamy zmiana jako tekst .

Teraz, w edytorze visual basic kopia oraz pasta następujący kod . 

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

Teraz naciśnij F5 do uruchomić kod.

Tutaj możemy zobaczyć krótka data sformatowaną komórką jest zmieniony do wartość tekstowa .

Kod Wyjaśnienie:

  • Użyliśmy Zakres Obiekt do wybierz the komórka w arkuszu, które zawierają wejście
  • Do format the wartość wejściowa jako tekst , musimy umieścić NumberFormat wartość jako "@".

Podobnie, stosując ten sam fragment kodu możemy zmienić różne formaty liczb do tekst .

Read More: Jak sformatować komórkę i wyśrodkować tekst za pomocą programu Excel VBA (5 sposobów)

Podobne lektury

  • Jak zmienić rozmiar czcionki całego arkusza za pomocą programu Excel VBA
  • Jak napisać 001 w Excelu (11 skutecznych metod)
  • Wyrównanie tekstu za pomocą przycisku polecenia VBA w programie Excel (5 metod)
  • Jak dodać tekst po liczbie z niestandardowym formatem w Excelu (4 sposoby)
  • Jak napisać pierwszą literę każdego słowa w Excelu (4 sposoby)

2. Odwołanie się do funkcji TEXT w kodzie VBA, aby sformatować komórkę jako tekst

Na stronie T EXT funkcja w Excelu jest funkcja arkusza że przekształca a wartość numeryczna lub ciąg do podany format . Although it's nie a Funkcja VBA , możemy go użyć odwołując się do Funkcja arkusza Obiekt do format a komórka do tekst Powiedzmy, że mamy Długa data w komórka B6 że chcemy format jako tekst .

Połóż następujący kod w edytor visual basic aby to osiągnąć. 

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

Przez prowadzenie kod za pomocą F5 przekształcony the długa data do tekst Podobnie możemy sformatować komórkę zawierającą różne formaty liczb do tekst .

Kod Wyjaśnienie:

  • Użyliśmy Zakres Obiekt do wybierz the komórki w arkuszu, które zawierają wejście oraz wartości wyjściowe.
  • Na stronie Obiekt WorksheetFunction umożliwił nam wykorzystanie Funkcja TEXT w Kod VBA .
  • Na stronie Funkcja TEXT potrzebuje 2 argumenty-.

wartość - ten odniesienie do komórki wejściowej (w tym przykładzie B6 ).

format_tekstu- używaliśmy " ' 0 " do konwersja the wartość do format tekstu.

Read More: Jak formatować tekst w komórce programu Excel (10 podejść)

3. Wykorzystanie funkcji VBA Format do formatowania komórki jako tekstu w Excelu

Na stronie Funkcja formatu jest jednym z funkcje konwersji w VBA Excela. To zwraca sformatowane wyrażenie oparty na format to jest podany jako drugi argument z funkcja W tym przykładzie, używając następujący kod my pożądany a Długa data w komórce C5 do tekst . 

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

Kod Wyjaśnienie:

  • Użyliśmy Zakres Obiekt do wybierz the komórki w arkuszu, które zawierają wejście oraz wartości wyjściowe.
  • Na stronie Funkcja formatu potrzebuje 2 argumenty-.

wyraz - ten odniesienie do komórki wejściowej (w tym przykładzie B6 ).

format - używaliśmy " ' 0 " do konwersja the wartość do format tekstu.

Kod alternatywny: 

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

Read More: Jak sformatować tekst, aby pierwsza litera była wielka w programie Excel (10 sposobów)

Uwagi

  • Dodaliśmy pojedynczy cytat ( ' ) przed zero aby wprowadzić numer kod format jako " ' 0 " w Tekst oraz Format funkcji argument do format a komórka do wartość tekstowa.
  • Do zobacz the kod związane z 3 różnymi metodami, kliknij the prawy przycisk na nazwa arkusza oraz wybierz the Opcja View Code.

Wniosek

Teraz wiemy, jak sformatować komórkę jako tekst za pomocą kodu VBA w Excelu z 3 różnymi przykładami. Mam nadzieję, że pomoże Ci to pewniej korzystać z tych metod. Wszelkie pytania lub sugestie nie zapomnij umieścić w polu komentarza poniżej.

Poprzedni post Jak używać funkcji TRUE w Excelu (10 idealnych przykładów)
Następny post Jak edytować tabelę przestawną w programie Excel (5 metod)

Hugh West jest bardzo doświadczonym trenerem i analitykiem Excela z ponad 10-letnim doświadczeniem w branży. Posiada tytuł licencjata w dziedzinie rachunkowości i finansów oraz tytuł magistra administracji biznesowej. Hugh ma pasję do nauczania i opracował unikalne podejście do nauczania, które jest łatwe do naśladowania i zrozumienia. Jego specjalistyczna wiedza na temat programu Excel pomogła tysiącom studentów i profesjonalistów na całym świecie doskonalić swoje umiejętności i osiągać doskonałe wyniki w karierze. Za pośrednictwem swojego bloga Hugh dzieli się swoją wiedzą ze światem, oferując bezpłatne samouczki programu Excel i szkolenia online, aby pomóc osobom indywidualnym i firmom w pełni wykorzystać swój potencjał.