/VBA/Vba code to remove leading and trailing spaces

Vba code to remove leading and trailing spaces

Vba remove leading blank space in string

Option Explicit
Function trimWhiteSpace(s As String) As String
	Dim RE As Object: Set RE = CreateObject("vbscript.regexp")
	With RE
		.Global = True
		.MultiLine = True
		.Pattern = "^\s*(\S.*\S)\s*"
		trimWhiteSpace = .Replace(s, "$1")
	End With
End Function

Source: stackoverflow.com

Similar codes

1 vote211 views1 answer
Add control vb
VBA
1 vote199 views1 answer
Vba compile error object required
VBA
0 vote220 views1 answer
Vb.net change cursor to wait
VBA
0 vote219 views1 answer
Convert unix to date vba
VBA
5 votes188 views1 answer
Vba array worksheet.index
VBA
1 vote221 views1 answer
Excel vba array remove first
VBA
0 vote219 views2 answers
Vba remove line breaks
VBA
0 vote202 views1 answer
Do until vb.net
VBA
1 vote150 views1 answer
Ms access open form to new record
VBA
0 vote211 views2 answers
Vb.net include quotes in string
VBA