Articles

VBA SubString

admin0

Excel VBA SubString

Excel VBA SubString er en meget nyttig type funktion i VBA, som bruges til at skære og skære en data i form af en streng. Men i regnearksfunktioner har vi tre understrengsfunktioner, som er Venstre-højre og midterfunktion, mens vi i VBA har Venstre-højre midter- og splitfunktioner som understrengsfunktioner. Som navnet antyder, opdeler substring-funktionen i VBA en streng i flere Substrings. Også som forklaret ovenfor i VBA er der flere VBA Substring-funktioner. I denne artikel vil vi lære at bruge disse substring-funktioner separat med eksempler. Før vi går videre med eksemplerne, skal vi først lære syntaksen for disse funktioner, og hvilket argument disse funktioner tager som input.

Syntaks for Excel VBA Substring

Følgende er de forskellige syntaks:

Se vores demokurser og videoer

Vurdering, Hadoop, Excel, Mobile Apps, Webudvikling & mange flere.

Syntaks for Left SubString-funktionen:

Tekststreng er den streng, vi giver som input, mens længden er det antal tegn, vi ønsker fra inputstrengen.

Eksempel: Hvis vi har en streng som ANAND og ønsker AN som understreng, vil koden være

Left (“ANAND”,2)

Syntaks for Right SubString Function:

Tekststreng er den streng, vi angiver som input, mens længden er antallet af tegn, vi ønsker fra inputstrengen.

Eksempel: Hvis vi har en streng som ANAND og bruger den samme kode som ovenfor, vil resultatet være

Right (“ANAND”,2)

Det giver ND som resultat.

Syntaks for Mid SubString-funktionen i VBA:

Tekststreng er den streng, vi giver som input, og Startposition er den position, hvor vi ønsker, at tegnet skal starte for udtræk, mens længden er det antal tegn, vi ønsker fra inputstrengen.

Eksempel: Vi har en streng som COMPUTER, og vi ønsker at PUT som understreng, så vil koden være som følger:

MID (“COMPUTER”,4,3)

Syntaks for Split SubString Function:

  • Expression As String:

    • Expression As String: Dette er et obligatorisk argument i SPLIT-funktionen. Det er grundlæggende den indtastningsstreng, som vi leverer.
    • Delimiter: Dette er et valgfrit argument. Det er den specifikke afgrænser, der opdeler strengen, men som standard betragtes mellemrum som standardafgrænser.
    • Grænse: Dette er også et valgfrit argument. Grænse betyder det maksimale antal dele, som vi ønsker at gøre af en streng. Men igen, hvis vi ikke giver en grænse til funktionen, behandler VBA den som standard -1. Dette konkluderer, at strengen vil blive brudt fra hinanden, hver gang der er en afgrænser i strengen.
    • Sammenligne: Dette sidste argument er også et valgfrit argument. Compare er en sammenligningsmetode, som er en af de to nedenstående:
    1. Enten er det 0, hvilket betyder, at SPLIT vil udføre en binær sammenligning, hvilket betyder, at hvert tegn skal matche sig selv.
    2. Og det kan være 1, hvilket betyder, at SPLIT-funktionen vil udføre en tekstlig sammenligning.

    Split-funktionen er den vanskeligste og mest nyttige blandt dem alle understrengsfunktionerne ovenfor. Alle de andre tre substring-funktioner bruger én streng som input, mens Split-funktionen bruger et array af strenge.

    For eksempel, hvis jeg skriver Split(“I AM A GOOD BOY”) vil opdele strengen som separat (hvert ord som separat). Lad os nu bruge disse substrings-funktioner i eksempler.

    Bemærk: For at bruge VBA skal vi have fanen Developer’s Tab aktiveret fra fanen File under afsnittet Options.

    Hvordan bruger man SubString-funktioner i VBA?

    Vi vil lære at bruge SubString-funktionen i Excel ved hjælp af VBA-koden.

    Du kan downloade denne VBA SubString Excel-skabelon her – VBA SubString Excel-skabelon

    Eksempel #1

    Venstre Substring-funktion i VBA. Lad os bruge den første substring funktion i VBA. For at gøre dette skal du følge nedenstående trin:

    Strin 1: Gå til fanebladet for udviklere, og klik på Visual Basic for at åbne VB Editor.

    Strin 2: Indsæt et nyt modul inde i Visual Basic Editor (VBE). Klik på fanen Indsæt > vælg Modul.

    Stræk 3: Deklarér en underfunktion for at begynde at skrive koden.

    Kode:

    Sub Sample()End Sub

    Stræk 4: Deklarér to strenge, en til at modtage input fra brugeren og en anden til at gemme værdien af resultatet.

    Kode:

    Sub Sample()Dim A, B As StringEnd Sub

    Stræk 5: Tag input fra brugeren til inputstrengen ved hjælp af inputbox-funktionen.

    Kode:

    Sub Sample()Dim A, B As StringA = InputBox("Enter a String", "Single String")End Sub

    Stræk 6: I B-variabel gemmer du værdien fra venstre funktion op til tredje sted.

    Kode:

    Sub Sample()Dim A, B As StringA = InputBox("Enter a String", "Single String")B = Left(A, 3)End Sub

    Stræk 7: Brug Msgbox-funktionen til at vise det endelige resultat.

    Kode:

    Sub Sample()Dim A, B As StringA = InputBox("Enter a String", "Single String")B = Left(A, 3)MsgBox BEnd Sub

    Strg 8: Kør nu ovenstående kode ved at trykke på F5-tasten. og skriv input String som ANAND.

    Strg 9: Når vi trykker på OK, ser vi resultatet af venstre delstrengsfunktion.

    ANA er de tre tegn fra venstre i strengen.

    Eksempel nr. 2

    RIGHT Substring-funktionen i VBA. Følg nedenstående trin til dette:

    Stræk 1: I samme modul erklærer du en anden underfunktion for at begynde at skrive koden til højre substring-funktionen.

    Kode:

    Sub Rightsub()End Sub

    Stræk 2: Deklarer to variabler A og B som streng.

    Kode:

    Sub Rightsub()Dim A, B As StringEnd Sub

    Stræk 3: Tag input fra brugeren, og gem værdien i A variablen.

    Kode:

    Sub Rightsub()Dim A, B As StringA = InputBox("Enter a String", "Single String")End Sub

    Stræk 4: Brug Right-funktionen på strengen til det tredje sted og gem værdien i B-variabel.

    Kode:

    Sub Rightsub()Dim A, B As StringA = InputBox("Enter a String", "Single String")B = Right(A, 3)End Sub

    Stræk 5: Brug Msgbox-funktionen til at vise værdien af B.

    Kode:

    Sub Rightsub()Dim A, B As StringA = InputBox("Enter a String", "Single String")B = Right(A, 3)MsgBox BEnd Sub

    Stræk 6: Kør koden, og indtast inputstrengen som “MORS”.

    Strg 7: Tryk på OK for at se resultatet.

    HER er de tre tegn fra højre i strengen.

    Eksempel #3

    MID Substring-funktion i VBA. Følg nedenstående trin til dette:

    Strg 1: I samme modul erklærer du en anden underfunktion for at begynde at skrive koden til Mid-funktionen.

    Kode:

    Sub MIDsub()End Sub

    Strg 2: Deklarer to variabler A og B som String.

    Kode:

    Sub MIDsub()Dim A, B As StringEnd Sub

    Stræk 3: Tag input fra brugeren, og gem værdien i variabel A.

    Kode:

    Sub MIDsub()Dim A, B As StringA = InputBox("Enter a String", "Single String")End Sub

    Stræk 4: Brug Mid-funktionen med startposition som 4 og længde som 3 gemmer værdien i B og viser den ved hjælp af Msgbox-funktionen.

    Kode:

    Sub MIDsub()Dim A, B As StringA = InputBox("Enter a String", "Single String")B = Mid(A, 4, 3)MsgBox BEnd Sub

    Stræk 5: Kør ovenstående kode og giv COMPUTER som input.

    Stræk 6: Tryk på OK for at se det endelige resultat.

    Understrengen PUT starter fra 4. position, og det er lykkedes os at udtrække tre tegn.

    Eksempel #4

    VBA Split SubString-funktion. Hertil skal du følge nedenstående trin:

    Stræk 1: I samme modul erklærer du en underfunktion for at begynde at skrive koden til underfunktionen.

    Kode:

    Sub SplitSub()End Sub

    Stræk 2: Deklarér to Variabler A som streng og B som String array og tag inputstrengen fra brugeren og gem den i Variabel A.

    Kode:

    Sub SplitSub()Dim A As StringDim B() As StringA = InputBox("Enter a String", "Separate with Commas")End Sub

    Stræk 3: Brug funktionen Split SubString og gem dens værdi i variabel B.

    Kode:

    Sub SplitSub()Dim A As StringDim B() As StringA = InputBox("Enter a String", "Separate with Commas")B = Split(A, ",")End Sub

    Stræk 4: Brug For loop til at vise hver SubString i en enkelt linje.

    Kode:

    Sub SplitSub()Dim A As StringDim B() As StringA = InputBox("Enter a String", "Separate with Commas")B = Split(A, ",")For i = LBound(B) To UBound(B)strg = strg & vbNewLine & "String Number " & i & " - " & B(i)Next iMsgBox strgEnd Sub

    Stræk 5 Kør ovenstående kode, og giv I,AM,GOOD,BOY som input.

    Stræk 6: Tryk på OK for at se resultatet.

    Vi har brugt “,” som afgrænser i ovenstående eksempel.

    Konklusion

    Som worksheet substring-funktioner har VBA også substring-funktioner. De er Left Right Mid og Split-funktioner. Grundlæggende opdeler Substring-funktioner en streng eller et array af strenge i flere delstrenge. Hvis vi ønsker en delstreng fra venstre side af strengen, bruger vi Left-funktionen eller højre side i det modsatte tilfælde. Hvis vi ønsker et mellemste tegn i en given streng, bruger vi MID-funktionerne. Også hvis vi har et array af strenge, bruger vi split-funktioner.

    Ting at huske

    Der er nogle få ting, som vi skal huske om Substring-funktioner i VBA:

    • Det svarer til regnearkets substring-funktioner.
    • Substring-funktioner opdeler en given streng i understrenge.
    • Hvis vi har et array af strenge, bruger vi split-funktioner.
    • Kun inputstrengen i split-funktionen er obligatorisk, mens de andre er valgfri.

    Anbefalede artikler

    Dette er en guide til VBA SubString. Her diskuterer vi, hvordan du bruger SubString-funktionen i Excel VBA sammen med praktiske eksempler og en excel-skabelon, der kan downloades. Du kan også gå igennem vores andre foreslåede artikler –

    1. VBA SendKeys
    2. VBA On Error Goto
    3. VBA Input
    4. VBA LBound
    0 Shares

Skriv et svar

Din e-mailadresse vil ikke blive publiceret.