I tried to running it from Word, in this case error "Argument not optional" didn't occur, but whatever excel shows "no matches" for all documents. I think problem with following part of code:
Quote:
|
Do While .Execute(findText:=CStr(vID(i)) & "[0-9]{1,}", MatchWildcards:=True)
|
How I said before, when I changed this part of code to this:
Quote:
|
Do While .Execute(findText:=CStr(vID(i)) & "<*>", MatchWildcards:=True)
|
everything works excellent, except the cases where TAGs have two or more "-" . In this case information is copied up to the second "-". Could you suggest how can I fix it?
01-30-2021, 05:42 AM
Similar Threads
Copy & Paste Word Doc from Excel VBA
Windows 10 
Office 2016
Hybrid Mode