Excel VBA TRIM -toiminto
VBA TRIM on luokiteltu merkkijono- ja tekstitoimintojen alle, tämä toiminto on VBA: n laskentataulukko-funktio ja samanlainen kuin laskentataulukon viite, jota tätä toimintoa käytetään leikkaamaan tai poistamaan ei-toivotut tilat merkkijonosta. ja palauttaa lähdön merkkijonona.
On useita tilanteita, joissa lataamme tiedot online-palvelimilta, ja kohtaamme järjestämättömän datan ja ei-toivottujen tilojen tilan solussa. Tarpeettomien tilojen käsittely on erittäin tuskallista työskennellä. Säännöllisissä laskentataulukko-funktioissa meillä on TRIM-niminen funktio excel-sovelluksessa, jotta voimme päästä eroon "Leading Spaces, Trailing Spaces ja the space-space" -elementeistä. VBA: ssa meillä on myös TRIM-funktio, joka toimii täsmälleen samalla tavalla kuin excel-funktio, mutta siellä on vain yksi pieni ero. Näemme sen tässä artikkelissa hieman myöhemmin.

Mitä trimmaustoiminto tekee?
TRIM on merkkijonofunktio, joka poistaa välilyönnit Excelistä valitusta solusta. Avaruuksissa meillä on 3 tyyppiä: "Johtavat tilat, Jälkitilat ja välitilat".
Johtava tila ei ole mitään, mutta ennen kuin arvo alkaa solussa, jos tilaa on, sitä kutsutaan johtavaksi avaruudeksi.

Jäljellä oleva tila ei ole mitään muuta kuin solun arvon päättymisen jälkeen, jos tilaa on, niin sitä kutsutaan lopputilaksi.

Avaruusväli ei ole mitään jokaisen sanan lopun jälkeen; ihannetapauksessa meillä pitäisi olla yksi välilyönti. Kaikkia enemmän kuin yhtä välilyöntiä kutsutaan välilyönniksi.

Kaikkien tällaisten ongelmien voittamiseksi meillä on toiminto nimeltä TRIM.
Syntaksi

Merkkijono: Mikä on merkkijono tai arvo, jonka haluat leikata? Se voi olla soluviittaus sekä suora arvon syöttö kaavaan.
Esimerkkejä
Esimerkki 1
Nyt näemme, kuinka voit poistaa johtavat välit Excelissä TRIM-toiminnolla. Seuraa alla olevia ohjeita
Vaihe 1: Luo makron nimi ja julista muuttuja merkkijonoksi.
Koodi:
Alaosan leikkaus_esimerkki1 () Himmennä merkkijonon loppuosana

Vaihe 2: Määritä nyt tälle ilmoitetulle muuttujalle arvo TRIM: n avulla.
Koodi:
Sub Trim_Example1 () Dim k As String k = Trim (End Sub

Vaihe 3: Tämän merkkijonotyypin kohdalla sana lainausmerkeissä sanalla “Welcome to VBA.”
Koodi:
Sub Trim_Example1 () Dim k As String k = Trim ("Welcome to VBA") End Sub

Vaihe 4: Näytä nyt tämän muuttujan tulos viestiruudussa.
Koodi:
Sub Trim_Example1 () Dim k As String k = Trim ("Tervetuloa VBA: lle") MsgBox k End Sub

Vaihe 5: Suorita tämä koodi F5-näppäimellä tai suorita manuaalisesti. Meidän pitäisi saada oikea merkkijono viestikenttään.

Tuotos:

Joten TRIM-toiminto poisti kaikki merkkijonon arvoon kirjoittamamme johtavat välit. Nyt tulos on oikea lause, "Tervetuloa VBA: han".
Esimerkki 2
Katso nyt vielä yksi esimerkki jäljessä olevien välilyöntien poistamiseksi. Ota sama sana, mutta tällä kertaa syötä välilyönnit.
”Tervetuloa VBA: han. "
Koodi:
Sub Trim_Example2 () Dim k As String k = Trim ("Tervetuloa VBA: lle") MsgBox k End Sub

Suorita tämä koodi manuaalisesti tai F5-näppäimen avulla. Trim-toiminto poistaa myös jäljessä olevat välilyönnit.

Tuotos:

Esimerkki # 3 - Puhdista solujen tiedot
Nyt näemme käytännön esimerkin tietojen puhdistamisesta Excel-soluissa. Oletetaan, että sinulla on alla olevan kaltainen tietojoukko Excel-taulukossasi.

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-trimmaustoiminto voi poistaa kaikenlaisia välilyöntejä.