/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

9 votes495 views2 answers
Excel vba convert 2 Short integers to a Long integer
VBA
0 vote239 views2 answers
S yyyy-MM-dd em vb net
VBA
22 votes510 views1 answer
Excel vba check if directory exists
VBA
0 vote220 views1 answer
Excel vba clear filter
VBA
0 vote230 views1 answer
Date as number vb
VBA
1 vote235 views1 answer
How to remove zeros in excel
VBA
0 vote232 views1 answer
How to get value from clipboard in vbnet
VBA
0 vote227 views1 answer
Excel vba extract year
VBA
0 vote221 views1 answer
Refer to resource using string variable vb.net
VBA
0 vote233 views1 answer
(SecurityProtocolType)3072 vb.net
VBA