Inconsistent Results

[BALOT]

I am getting the error "0x80020005, Type mismatch" but its not consistent. Sometimes the macro works, sometimes I get the message.

I dont even know which line is in error