/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

3 votes170 views1 answer
Vba make long from two shorts
VBA
1 vote176 views1 answer
Random number generator vb.net
VBA
22 votes238 views1 answer
Xlvba check for folder
VBA
0 vote180 views1 answer
Vba add shape oval
VBA
1 vote178 views1 answer
Add a index column power bi
VBA
2 votes178 views1 answer
Vba ado ace sql alias ignored for calculated column
VBA
0 vote180 views1 answer
Dynamic array vba
VBA
0 vote208 views1 answer
Excel vba convert cells address
VBA
3 votes182 views1 answer
Vba double quote
VBA
5 votes177 views1 answer
Excel vba get user selected range
VBA