Besedilo je v Excelu funkcija delovnega lista, lahko pa ga uporabljate tudi v VBA, medtem ko z njim uporabljate lastnost obsega, funkcija za to funkcijo je podobna funkciji delovnega lista in zavzame enako število argumentov, ki so vrednosti, ki jih je treba pretvorjena in določena oblika številke.
Funkcija besedila Excel VBA
BESEDILO je funkcija, ki je na voljo v delovnem listu, žal pa ni vgrajena funkcija v Excelu VBA. Za dostop do te funkcije moramo uporabiti objekt razreda delovnega lista v VBA. Besedilna funkcija v Excelu pretvori vrednost v določeno številčno obliko.
Ena od težav s to funkcijo kot argumenti. Kadarkoli uporabimo razred funkcije delovnega lista VBA, ne dobimo jasne sintakse, podobno kot na našem delovnem listu. Samo piše "Arg1" in "Arg2".
- Arg1 je vrednost, na katero moramo uporabiti oblikovanje.
- Arg2 je oblikovanje, ki ga moramo uporabiti, in določiti moramo kodo za oblikovanje.
Primeri funkcije besedila VBA v Excelu
Spodaj so primeri funkcije Excel VBA Text Function.
Primer # 1
Naj vam pokažem preprost primer BESEDILA v programu VBA Excel. Oglejte si spodnjo kodo v Visual Basic.
Koda:
Sub Text_Example1 () Dim FormattingValue As String Dim FormattingResult As String FormattingValue = 0,564 FormattingResult = WorksheetFunction.Text (FormattingValue, "hh: mm: ss AM / PM") MsgBox FormattingResult End Sub
Najprej sem v spremenljivki VBA razglasil dve spremenljivki kot niz.
Dim FormattingValue As String Dim FormattingValue kot niz
Za prvo spremenljivko sem določil številko za oblikovanje, ki jo moramo formatirati.
FormattingValue = 0,564
Zdaj sem za drugo spremenljivko dodelil funkcijo TEXT.
FormattingResult = WorksheetFunction.Text (FormattingValue, "hh: mm: ss AM / PM")
Če opazite, sem uporabil oblikovanje časa, tj. "Hh: mm: ss AM / PM."
Nato sem na koncu uporabil polje s sporočilom VBA, ki prikazuje rezultat.
Rezultat oblikovanja MsgBox
Ko zaženem kodo, bo funkcija TEXT uporabila časovno obliko za številko 0,564 in prikazala rezultat, kot je prikazano spodaj.
Torej, čas imamo kot " 13:32:10 PM ".
2. primer
Podobno kot v primeru oblike zapisa datuma smo tudi v tem primeru naredili nekaj manjših sprememb. Spodaj je koda.
Koda:
Sub Text_Example2 () Dim FormattingValue As String Dim FormattingResult As String FormattingValue = 43585 FormattingResult = WorksheetFunction.Text (FormattingValue, "DD-MMM-LLLL") MsgBox FormattingResult End Sub
Od prejšnje kode sem vrednost oblikovanja spremenil z 0,565 na 43585 in spremenil slog oblikovanja kot »DD-MMM-LLLL«.
S tem bo formatiranje uporabljeno za številko 43585 kot datum, rezultat pa je naslednji.
Uporabi oblikovanje za celice
Videli smo preproste primere. Zdaj pa poglejte, kako delati s celicami na delovnem listu. Za ta primer si oglejte spodnje podatke.
Za vse te številke moramo uporabiti časovno obliko. Ta koda bo uporabila oblikovanje.
Koda:
Sub Text_Example3 () Dim k Kot celo število za k = 1 do 10 celic (k, 2). Vrednost = Funkcija delovnega lista. Besedilo (Celice (k, 1). Vrednost, "hh: mm: ss AM / PM") Naprej k Konec Pod
Ta koda bo zavila skozi 10 celic in uporabila spodnje oblikovanje.
Tako lahko z uporabo funkcije VBA TEXT v celicah uporabimo oblikovanje števil.
