/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 vote161 views1 answer
Vbs run
VBA
25 votes292 views2 answers
Excel vba folder exist
VBA
0 vote160 views1 answer
Priavte sub with multiple handels find sneder
VBA
0 vote155 views1 answer
Search in richtextbox vb.net
VBA
0 vote151 views1 answer
Vb net dgv doesn't keep currency format
VBA
0 vote147 views2 answers
Excel vba close without saving
VBA
0 vote144 views1 answer
Vba len variant
VBA
0 vote150 views1 answer
Enable macros on opening workbook vba
VBA
2 votes157 views1 answer
Excel vba date to string conversion
VBA
0 vote161 views1 answer
Build an index all files of a FTP site
VBA