Double every tilde (~) in a string - VBA code

[gmcgough600]

Just looking for some code that will take a string (stored in a variable named find_value) and double every tilde (~).

For example if the string is AAA~BBB I want to change it to AAA~~BBB

Thanks in advance

(ultimately this will feed into a find and replace operation where if you want to find a tilde you need to search for "~~", are there any other characters other than an asterisk (*) where a find and replace won't work without some additional code?)

 

[RoryA]

The VBA Replace function does not accept wildcards, so:

replace("AAA~BBB", "~","~~")

 

[gmcgough600]

That's perfect, thanks!