Excel VBA TRIM-functie (uitgelegd met voorbeelden)

Excel heeft al een TRIM-werkbladfunctie die u kunt gebruiken om voorloop-, volg- en extra spaties tussen woorden/tekenreeksen te verwijderen.

Er is ook een TRIM-functie in VBA (en het doet precies hetzelfde - extra spaties verwijderen).

Waarom hebben we ook een TRIM-functie in VBA nodig?

Terechte vraag!

Terwijl u met de ingebouwde TRIM-functie in Excel-werkbladen kunt werken om spaties te verwijderen. in sommige gevallen moet u dit mogelijk doen met VBA.

Dit kan een onderdeel zijn van een grotere code.

Syntaxis van de VBA TRIM-functie

TRIM (tekenreeks)

'String' is het argument dat een tekenreeks kan zijn of een variabele die een tekenreeks bevat.

Laten we met een paar voorbeelden leren hoe we de VBA TRIM-functie kunnen gebruiken.

Voorbeeld 1 - Resultaat weergeven in een berichtvenster

Stel je hebt de volgende tekst in cel A1

Merk op dat er spaties voor en na de zin staan.

De onderstaande code zou deze zin nemen en het resultaat tonen na het bijsnijden van de extra spaties

Sub TrimExample1() MsgBox Trim(Range("A1")) End Sub

Er is één belangrijk ding om te weten bij het gebruik van de TRIM-functie in VBA: het verwijdert alleen de voorloop- en volgspaties. Het zal de extra spaties tussen woorden niet verwijderen (wat de ingebouwde TRIM-functie in het werkblad doet).

Stel dat u de volgende tekst in cel A1 hebt staan ​​(met extra spaties tussen woorden):

Als ik de bovenstaande VBA-code gebruik, wordt een berichtvenster weergegeven zoals hieronder weergegeven:

Zoals u kunt zien in het resultaat van het berichtvenster, worden de extra spaties tussen woorden niet verwijderd door de VBA TRIM-functie.

Wat is dan het alternatief?

Als u voorloop-, volg- en dubbele spaties tussen woorden wilt verwijderen, kunt u beter de volgende code gebruiken:

Sub TrimExample1() MsgBox WorksheetFunction.Trim(Range("A1")) End Sub

De bovenstaande code gebruikt de TRIM-functie van het werkblad (in plaats van de TRIM-functie in VBA).

Opmerking: de VBA Trim-functie verwijdert niet de niet-witruimtetekens - zoals nieuwe regels (vbNewLine, vbCrLf) enz.

Voorbeeld 2 - Verwijder snel voorloop- en volgspaties uit een reeks cellen

Stel dat u een gegevensset hebt zoals hieronder weergegeven met voorloop- en volgspaties:

U kunt de onderstaande code gebruiken om deze gegevens onmiddellijk op te schonen en alle voorloop- en volgspaties te verwijderen:

Sub TrimExample1() Dim Rng As Range Set Rng = Selectie voor elke cel in Rng Cell.Value = Trim (Cell) Next Cell End Sub

De bovenstaande code gaat door alle cellen in de selectie en verwijdert de voorloop- en volgspaties.

Misschien vind je de volgende Excel/VBA-zelfstudies misschien ook leuk:

• 10 manieren om gegevens in Excel op te schonen.
• Excel VBA Split-functie.
• Excel VBA InStr-functie.
• VBA LCase-functie.
• VBA UCase-functie.
• Een door de gebruiker gedefinieerde functie (UDF) maken in Excel VBA.