/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 vote146 views1 answer
Excel vba populate array with cell values
VBA
0 vote172 views1 answer
Excel vba paste all to each sheet in workbook
VBA
6 votes167 views1 answer
Excel vba check if a string only contains letters
VBA
0 vote161 views1 answer
Excel vba first working day month
VBA
-1 vote153 views1 answer
Vba sendkeys
VBA
1 vote146 views1 answer
Excel vba convert cells(1,1) into A1 and vice versa
VBA
3 votes165 views1 answer
Excel vba change format of cell
VBA
0 vote156 views1 answer
Vbs
VBA
3 votes169 views1 answer
Excel vba export sheet as a csv without losing focus of my current workbook
VBA
5 votes184 views1 answer
Excel vba last byte from INTEGER
VBA