mystring = replace (mystring, chr ( 39), "") ' Replace single quotes
mystring = replace (mystring, chr ( 34), "")' Replace double quotes
mystring = replace (mystring, "< ", "") ' replace <
MyString = replace (MyString, ">", "") 'replace>
MyString = replace (MyString, CHR (13 is), "")' replace carriage
mystring = replace (mystring, chr ( 32), "" ) 'Alternatively spaces
mystring = replace (mystring, chr ( 9), "")' replace tab character
Alternatively VBA.replace single or double quotes
Guess you like
Origin www.cnblogs.com/shida-liu/p/12115229.html
Ranking