/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

0 vote281 views1 answer
Vba compare strings
VBA
0 vote279 views1 answer
Find control with name vb
VBA
0 vote276 views1 answer
Excel vba Column Name to Column Number
VBA
8 votes370 views1 answer
Excel vba make word
VBA
0 vote288 views2 answers
Get unique random number in vb.net
VBA
0 vote272 views1 answer
VBA Loop to range
VBA
0 vote301 views1 answer
Move bindingnavigator vb
VBA
0 vote298 views1 answer
Vbnet check if string is only letters
VBA
0 vote284 views1 answer
Vba add spaces
VBA
1 vote289 views1 answer
Vba format string as cash
VBA