If there is always ": " after 'INFARMED' you could use the following simple method to extract the number from the string:
myStr = "N.º Reg. INFARMED: 5038756"
getStr = Mid(myStr, InStr(myStr, ": ") + 2)
The name specified is not recognized as an internal or external command, operable program or batch file.