/ / Manipulare de coarde VBA Excel

Executarea manualelor de coarde VBA

Alăturați-vă șirurilor | Stânga | Dreapta | la mijlocul | Len | Instr

În acest capitol veți găsi cele mai importante funcții manipulați șiruri de caractere în Excel VBA.

Plasați un buton de comandă pe foaia dvs. de lucru și adăugați linii de cod de mai jos. Pentru a executa liniile de cod, faceți clic pe butonul de comandă de pe foaie.

Alăturați-vă șirurilor

Folosim operatorul & pentru a concatena (alatura) siruri de caractere.

Cod:

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

MsgBox text1 & " " & text2

Rezultat:

Alăturați-vă șirurilor

Notă: pentru a insera un spațiu, utilizați ""

Stânga

Pentru a extrage caracterele din stânga dintr-un șir, utilizați Stânga.

Cod:

Dim text As String
text = "example text"

MsgBox Left(text, 4)

Rezultat:

Stânga

Dreapta

Pentru a extrage caracterele din dreapta de la un șir, utilizați dreapta. De asemenea, putem introduce direct text într-o funcție.

Cod:

MsgBox Right("example text", 2)

Rezultat:

Dreapta

la mijlocul

Pentru a extrage un substring, pornind în mijlocul unui șir, utilizați Mid.

Cod:

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

Rezultat:

la mijlocul

Notă: a început la poziția 9 (t) cu lungimea 2. Puteți omite al treilea argument dacă doriți să extrageți un substring care începe în mijlocul unui șir, până la sfârșitul șirului.

Len

Pentru a obține lungimea unui șir, utilizați Len.

Cod:

MsgBox Len("example text")

Rezultat:

Len

Notă: spațiul (poziția 8) este inclus!

Instr

Pentru a găsi poziția unui subrevers într-un șir, utilizați Instr.

Cod:

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

Rezultat:

Instr

Notă: șirul "am" a fost găsit în poziția 3.

De asemenea, citiți: