VBA TRIM-funktion - Hvordan bruges Excel VBA TRIM-funktion?

Indholdsfortegnelse

Excel VBA TRIM-funktion

VBA TRIM er kategoriseret under streng- og tekstfunktionerne, denne funktion er en regnearkfunktion i VBA og svarer til regnearkreferencen, denne funktion bruges til at trimme eller fjerne de uønskede mellemrum fra en streng, det tager et enkelt argument, som er en inputstreng og returnerer et output som en streng.

Der er flere situationer, hvor vi downloader dataene fra online servere, og vi står over for en situation med uorganiserede data og uønskede rum i cellen. At håndtere unødvendige rum er meget smertefuldt at arbejde med. I almindelige regnearksfunktioner har vi en funktion kaldet TRIM i excel for at slippe af med "Leading Spaces, Trailing Spaces og in-between space." I VBA har vi også en funktion kaldet TRIM, som fungerer nøjagtigt den samme som excel-funktionen, men der er kun en lille forskel er der. Det vil vi se i denne artikel lidt senere.

Hvad gør trimfunktion?

TRIM er en strengfunktion, der fjerner mellemrum i Excel fra den valgte celle. I mellemrum har vi tre typer "førende rum, bageste rum og mellemrum."

Leading Space er intet, men før der er nogen værdi, der starter i cellen, hvis der er noget space, kaldes det Leading Space.

Trailing Space er intet andet end efter afslutningen af ​​værdien i cellen, hvis der er noget mellemrum, kaldes det som Trailing Space.

Mellemrummet er intet efter afslutningen af ​​hvert ord; ideelt set skulle vi have et mellemrum. Alt mere end et mellemrum kaldes Mellemrum.

For at overvinde alle disse slags problemer har vi en funktion kaldet TRIM.

Syntaks

Streng: Hvad er den streng eller værdi, du vil trimme? Det kunne være cellehenvisning såvel som en direkte tilførsel af værdi til formlen.

Eksempler

Eksempel nr. 1

Nu vil vi se, hvordan man fjerner ledende rum i Excel ved hjælp af TRIM-funktionen. Følg nedenstående trin

Trin 1: Opret et makronavn og erklær en variabel som streng.

Kode:

Sub Trim_Example1 () Dim k As String End Sub

Trin 2: Nu tildeles en værdi for denne erklærede variabel ved hjælp af TRIM.

Kode:

Sub Trim_Example1 () Dim k As String k = Trim (End Sub

Trin 3: For denne strengtype anføres ordet med dobbelt anførselstegn som "Velkommen til VBA."

Kode:

Sub Trim_Example1 () Dim k As String k = Trim ("Welcome to VBA") End Sub

Trin 4: Vis nu resultatet af denne variabel i meddelelsesboksen.

Kode:

Sub Trim_Example1 () Dim k As String k = Trim ("Welcome to VBA") MsgBox k End Sub

Trin 5: Kør denne kode ved hjælp af F5-tasten, eller kør manuelt. Vi skulle få en korrekt streng i meddelelsesboksen.

Produktion:

Så TRIM-funktionen fjernede alle de førende mellemrum, vi har angivet i strengværdien. Nu er resultatet en korrekt sætning, dvs. "Velkommen til VBA."

Eksempel 2

Se nu på endnu et eksempel for at fjerne bageste mellemrum. Tag det samme ord, men denne gang skal du indtaste bageste mellemrum.

”Velkommen til VBA. “

Kode:

Sub Trim_Example2 () Dim k As String k = Trim ("Welcome to VBA") MsgBox k End Sub

Kør denne kode manuelt eller gennem F5-tasten Trim-funktion fjerner også bageste mellemrum.

Produktion:

Eksempel # 3 - Rens dataene i celler

Nu vil vi se det praktiske eksempel på rengøring af data i excel-celler. Antag, at du har et datasæt som nedenfor i dit excel-ark.

When we have more than one cell data, we need to write different codes. Follow the below steps to write code.

Step 1: Declare a variable as “Range.”

Code:

Sub Trim_Example3() Dim MyRange As Range End Sub

Step 2: Since the range data type is an object, we need to set the range first. So set the range as “selection.”

Code:

Sub Trim_Example3() Dim MyRange As Range Set MyRange = Selection End Sub

Note: MyRange = Selection means whatever the cells I select becomes a range. So in that range, TRIM removes unwanted spaces.

Step 3: Now, using For Each VBA Loop, apply the TRIM function.

Code:

Sub Trim_Example3() Dim MyRange As Range Set MyRange = Selection For Each cell In MyRange cell.Value = Trim(cell) Next End Sub

Step 4: Now go back to the worksheet. Go to insert and draw a rectangular shape.

Step 5: Add a word to the inserted rectangular shape as click here to clean the data.

Step 6: Right-click on the rectangular shape and select the assigned macro.

Step 7: Now, the macro names box will open. Select the name of the macro we just created. Click on Ok.

Step 8: Now select the range where we need to clean the data.

Step 9: After selecting the range, click on the assigned macro rectangular box. It will clean the data.

So we got cleaned value, i.e., after removing leading & trailing spaces.

Difference Between Excel & VBA Trim Function

The only difference between them is VBA function cannot remove in between spaces while the worksheet function in VBA does. For example, take a look at the below example.

In cell A3, we have in-between spaces. If select and click on the rectangular shape, it will only remove trailing & leading spaces, not in-between spaces.

To overcome this problem, we need to use the trim function as a worksheet function in the code.

Code:

Sub Trim_Example3() Dim MyRange As Range Set MyRange = Selection For Each cell In MyRange cell.Value = WorksheetFunction.Trim(cell) Next End Sub

Here we have used a worksheet function, not a VBA function. This will remove all kinds of spaces.

Things to Remember

  • VBA Trim & Worksheet Trim syntax is exactly the same.
  • It can only remove leading & trailing spaces, not in-between spaces.
  • Excel-trimfunktion kan fjerne alle slags mellemrum.

Interessante artikler...