/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 vote100 views1 answer
Vba set vs dim
VBA
2 votes137 views1 answer
Vba split string
VBA
1 vote135 views1 answer
Textbox find and replace vb
VBA
0 vote158 views1 answer
Vba round to 2 decimals
VBA
0 vote148 views1 answer
Windows Presentation Foundation dark title bar
VBA
0 vote164 views1 answer
Excel vba move down to next visible cell
VBA
0 vote142 views1 answer
Vbscript check if string is empty
VBA
0 vote142 views1 answer
Excel vba saveas no prompt for overwrite
VBA
1 vote169 views1 answer
Excel vba convert text YYYYMMDD to date
VBA
1 vote136 views1 answer
Excel vba hide zero values
VBA