/ / "Excel VBA" styginių manipuliatorius

Excel VBA styginių manipuliatorius

Prisijungti prie styginių | Kairėje | Teisingai | Viduryje | Len | Instrumentas

Šiame skyriuje rasite svarbiausias funkcijas manipuliuoti stygomis in Excel VBA.

Įdėkite komandų mygtuką į savo darbalapį ir pridėkite žemiau esančias kodo eilutes. Norėdami paleisti kodo eilutes, spustelėkite komandą mygtuką lape.

Prisijungti prie styginių

Mes naudojame & operatorių susieti (prisijungti) eilutes.

Kodas:

Dim text1 As String, text2 As String
text1 = "Hi"
text2 = "Tim"

MsgBox text1 & " " & text2

Rezultatas:

Prisijungti prie styginių

Pastaba: jei norite įterpti tarpą, naudokite ""

Kairėje

Norėdami išgauti kairiuosius simbolius iš eilutės, naudokite kairįjį.

Kodas:

Dim text As String
text = "example text"

MsgBox Left(text, 4)

Rezultatas:

Kairėje

Teisingai

Norėdami išgauti dešinę simbolius iš eilutės, naudokite dešinę. Mes taip pat galime tiesiogiai įterpti tekstą į funkciją.

Kodas:

MsgBox Right("example text", 2)

Rezultatas:

Teisingai

Viduryje

Norėdami išgauti substringą, pradedant eilutės viduryje, naudokite Mid.

Kodas:

MsgBox Mid("example text", 9, 2)

Rezultatas:

Viduryje

Pastaba: prasidėjo 9 taške (t) su ilgiu 2. Galite praleisti trečiąjį argumentą, jei norite išgauti substring, prasidedančią eilutės viduryje, iki eilutės pabaigos.

Len

Norėdami gauti styginių ilgį, naudokite Len.

Kodas:

MsgBox Len("example text")

Rezultatas:

Len

Pastaba: erdvė (8 pozicija) yra įtraukta!

Instrumentas

Jei norite rasti substringo poziciją eilutėje, naudokite Instr.

Kodas:

MsgBox Instr("example text", "am")

Rezultatas:

Instrumentas

Pastaba: eilutė "am" randama 3 pozicijoje.

Taip pat perskaitykite: