VBA Substring – Sådan Substring i Excel Macro

author
3 minutes, 42 seconds Read

Substring er en af de mest populære funktioner i ethvert programmeringssprog. Det letter dine opgaver, mens du beskæftiger dig med strenge. Som navnet antyder, opdeler en substring-funktion en streng i forskellige dele baseret på bestemte kriterier.

Der er flere VBA Substring-funktioner. I praktiske situationer kan disse substring-funktioner være ganske nyttige til at udtrække en del af en streng.

I dag i dette indlæg vil jeg forklare alle de VBA substring-funktioner, som du kan bruge i Excel-makroer:

Indholdsfortegnelse

LEFT Substring-funktion:

Funktionen LEFT i Excel VBA bruges til at hente et bestemt antal tegn fra starten af strengen. Syntaksen for LEFT-funktionen er som følger:

Left (text_string, length)
  • Her henviser ‘text_string’ til en indtastningsstreng, der skal adskilles.
  • Og ‘length’ henviser til antallet af tegn, der skal udtrækkes.

Eksempler:

Venstre ("Exceltrick", 5) 'giver et output "Excel"
Venstre ("SomeText", 4) 'giver resultatet "Some"

Bemærk: I stedet for at bruge en hårdkodet streng i det første argument kan du også hente ‘text_string’ fra dit excel-ark som ActiveSheet.Range(“A1”).

Højre Substring-funktion:

  

Den højre funktion i Excel VBA er lige modsat den venstre funktion. Den returnerer et angivet antal tegn fra slutningen af tekststrengen. Syntaksen for RIGHT-funktionen er som følger:

Right (text_string, length)
  • Her henviser ‘text_string’ til en indtastningsstreng, der skal adskilles.
  • Og ‘length’ henviser til antallet af tegn, der skal udtrækkes, men udtrækningen begynder fra højre side.

Eksempel:

Right ("Exceltrick", 5) 'giver et output "trick"
Right ("SomeText", 4) 'giver resultatet "Text"

Note: I stedet for at bruge en hårdkodet streng i det første argument kan du også hente ‘text_string’ fra dit excel-ark som ActiveSheet.Range(“A1”).

MID Substring-funktion:

MID er en meget bedre funktion end de to første, da den giver dig mulighed for at angive start- og slutpositioner for den udtrukne streng. Syntaksen for MID VBA Substring-funktionen er som følger:

Mid(text_string, start_position, Length)
  • Her henviser ‘text_string’ til en indtastningsstreng, som skal adskilles.
  • ‘start_position’ henviser til den numeriske position, hvorfra udtrækningen skal startes.
  • Og ‘længde’ henviser til antallet af tegn, der skal udtrækkes.

Eksempel:

MID ("Exceltrick", 2,4) 'giver et output "celt"
MID ("SomeText", 4,4) 'giver resultatet "Text"

Note: I stedet for at bruge en hardcoded string i det første argument kan du også hente ‘text_string’ fra dit excel-ark som ActiveSheet.Range(“A1”).

SPLIT Substring-funktion:

Funktionen SPLIT er en anden VBA-funktion, der kan bruges til at understrenge eller opdele en streng. SPLIT-funktionen kan være meget praktisk, når du deler en tekststreng op i flere dele baseret på en afgrænser. Syntaksen for en split-funktion er som følger:

Split (text_string, Delimiter, limit, Compare)
  • Her henviser “text_string” til en indtastningsstreng, der skal adskilles.
  • “Delimiter” henviser til det afgrænsningstegn, der adskiller strengen i dele. Dette er et valgfrit argument, og hvis det ikke udfyldes, antages mellemrumstegnet ” ” at være standardafgrænseren.
  • ‘limit’ henviser til det maksimale antal dele af delstrengen, som strengen skal opdeles i. Det er også et valgfrit argument, standardværdien er (-1), hvilket betyder, at delstrengen skal ske ved hver position, hvor afgrænseren er mødt.
  • ‘compare’ er en valgfri numerisk værdi, der angiver den sammenligning, der skal anvendes ved evaluering af delstrenge.

Eksempel:

For eksempel har du en tekststreng som “Dette er en tekststreng”, og nu skal du opdele denne streng i individuelle ord, så i dette tilfælde vil du bruge mellemrum ” ” som afgrænser. Splitfunktionen bruges som:

Split ("Dette er en tekststreng", " ")

Resultatet af denne splitfunktion er et array af ord: “Dette” “er” “en” “tekst” “streng”.

Anbefalet læsning: VBA Split Function

VBA Substring Macro Example: VBA Substring Macro Example:

Nedenfor har jeg oprettet en makro, der illustrerer alle de understrengsteknikker, der er tilgængelige i VBA-programmering. Dette er en simpel og selvforklarende makro, i denne har jeg blot opdelt en tekststreng med de 4 metoder, som jeg har beskrevet ovenfor.

Nedenfor er den kode, som jeg har brugt til denne makro:

Sub BreakStrings()
'Left function
a = Left("Excel Trick Text", 5)
'Right function
b = Right("Excel Trick Text", 11)
'Mid function
c = Mid("Excel Trick Text", 1, 11)
'Split funktion
d = Split("Excel Trick Text", " ")
For Each wrd In d
strg = strg & wrd & ", "
Next
'Visning af resultaterne i en mesage boks
MsgBox "Left: " & a & vbNewLine & "Right: " & b & vbNewLine & "Mid: " & c & vbNewLine & "Split: " & strg
End Sub

Så, dette var alt om VBA-understrengsfunktioner. Må dele din mening relateret til emnet.

Similar Posts

Skriv et svar

Din e-mailadresse vil ikke blive publiceret.