Funcția Excel VBA TRIM
VBA TRIM este clasificat în funcțiile șir și text, această funcție este o funcție de foaie de lucru în VBA și similară cu referința foaiei de lucru, această funcție este utilizată pentru a tăia sau a elimina spațiile nedorite dintr-un șir, are un singur argument care este un șir de intrare și returnează o ieșire ca un șir.
Există mai multe situații în care descărcăm datele de pe serverele online și ne confruntăm cu o situație de date neorganizate și spații nedorite în celulă. Lucrul cu spațiile inutile este foarte dureros de lucrat. În funcțiile obișnuite ale foii de lucru, avem o funcție numită TRIM în excel pentru a scăpa de „Spații de conducere, spații finale și spațiu intermediar”. În VBA avem, de asemenea, o funcție numită TRIM, care funcționează exact la fel ca funcția excel, dar există o singură diferență. Vom vedea asta în acest articol puțin mai târziu.
Ce face funcția Trim?
TRIM este o funcție șir care elimină spațiile din excel din celula selectată. În spații, avem 3 tipuri „Spații principale, spații finale și spațiu intermediar”.
Spațiul de conducere nu este nimic, dar înainte de a începe orice valoare în celulă, dacă există spațiu, atunci se numește Spațiu de conducere.
Trailing Space nu este altceva decât după sfârșitul valorii din celulă dacă există spațiu, atunci se numește Space Trailing.
In-Between Space nu este nimic după sfârșitul fiecărui cuvânt; în mod ideal, ar trebui să avem un caracter spațial. Orice mai mult de un personaj spațial se numește spațiu între spații.
Pentru a depăși toate aceste tipuri de probleme, avem o funcție numită TRIM.
Sintaxă
Șir: Care este șirul sau valoarea pe care doriți să o tăiați? Ar putea fi referință de celulă, precum și o furnizare directă de valoare pentru formulă.
Exemple
Exemplul nr. 1
Acum vom vedea cum să eliminăm spațiile de conducere în Excel folosind funcția TRIM. Urmați pașii de mai jos
Pasul 1: Creați un nume de macro și declarați o variabilă ca Șir.
Cod:
Sub Trim_Example1 () Dim k As String End Sub
Pasul 2: Acum, pentru această variabilă declarată, atribuiți o valoare utilizând TRIM.
Cod:
Sub Trim_Example1 () Dim k As String k = Trim (End Sub
Pasul 3: pentru acest tip de șir, cuvântul între ghilimele duble ca „Bun venit la VBA”.
Cod:
Sub Trim_Example1 () Dim k As String k = Trim ("Bun venit la VBA") End Sub
Pasul 4: Afișați acum rezultatul acestei variabile în caseta de mesaje.
Cod:
Sub Trim_Example1 () Dim k As String k = Trim ("Bun venit la VBA") MsgBox k End Sub
Pasul 5: Rulați acest cod folosind tasta F5 sau rulați manual. Ar trebui să obținem un șir corect în caseta de mesaj.
Ieșire:
Deci, funcția TRIM a eliminat toate spațiile principale pe care le-am introdus în valoarea șirului. Acum rezultatul este o propoziție corectă, adică „Bun venit la VBA”.
Exemplul nr. 2
Acum aruncați o privire la încă un exemplu pentru a elimina spațiile finale. Luați același cuvânt, dar de data aceasta, introduceți spații finale.
„Bun venit la VBA. „
Cod:
Sub Trim_Example2 () Dim k As String k = Trim ("Bun venit la VBA") MsgBox k End Sub
Rulați acest cod manual sau prin intermediul tastei F5 Funcția Trim elimină și spațiile de urmărire.
Ieșire:
Exemplul # 3 - Curățați datele din celule
Acum vom vedea exemplul practic de curățare a datelor în celulele Excel. Să presupunem că aveți un set de date precum cel de mai jos în foaia dvs. Excel.
Când avem mai multe date de celulă, trebuie să scriem coduri diferite. Urmați pașii de mai jos pentru a scrie cod.
Pasul 1: declarați o variabilă ca „Interval”.
Cod:
Sub Trim_Example3 () Dim MyRange As Range End Sub
Pasul 2: Deoarece tipul de date al intervalului este un obiect, trebuie să setăm mai întâi intervalul. Deci, setați intervalul ca „selecție”.
Cod:
Sub Trim_Example3 () Dim MyRange as Range Set MyRange = Selection End Sub
Notă: MyRange = Selection înseamnă orice celule pe care le selectez devin un interval. Deci, în acea gamă, TRIM elimină spațiile nedorite.
Pasul 3: Acum, folosind Pentru fiecare buclă VBA, aplicați funcția TRIM.
Cod:
Sub Trim_Example3 () Dim MyRange as Range Set MyRange = Selecție pentru fiecare celulă din celula MyRange. Valoare = Trim (celulă) Următorul sfârșit 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.
- Funcția de tăiere Excel poate elimina tot felul de spații.
