/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 vote290 views1 answer
Vba compile error object required
VBA
0 vote288 views1 answer
Check range is in another range vba
VBA
0 vote308 views1 answer
Vba collection contains
VBA
0 vote293 views1 answer
Vba dictionary clear
VBA
1 vote324 views1 answer
Vba ubound array 2-dimensional
VBA
3 votes330 views1 answer
Extract word in a text in excel
VBA
0 vote319 views1 answer
Columns dont autoresize on program start vb.net
VBA
31 votes426 views1 answer
Excel vba function to convert column number to letter
VBA
0 vote329 views1 answer
Move bindingnavigator vb
VBA
12 votes403 views1 answer
Excel vba write string to text file
VBA