/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 vote236 views1 answer
Excel vba paste all to each sheet in workbook
VBA
0 vote229 views1 answer
Dlete rows with blanks and space " " vba
VBA
1 vote167 views1 answer
Vba Remove Case Sensitivity
VBA
0 vote212 views1 answer
Vba code to open a file with login rights
VBA
0 vote210 views1 answer
Dynamically change drop down list visual basic
VBA
0 vote260 views1 answer
Windows Forms dark title bar
VBA
0 vote227 views1 answer
VB Error Code BC30201
VBA
0 vote213 views2 answers
Excel vba prevent save
VBA
5 votes245 views1 answer
Excel vba low word from Long Integer
VBA
1 vote215 views1 answer
Vba optional
VBA