That shouldn't happen, but you have shown
Code:
"If .Tag = 0 Then" GoTo lbl_Exit
There should be no quotes in that line?
Check VBA > Tools > References and see if you have the following checked.
Obviously if you have a different Office version the office numbered references will be different.