Share a macro that report cast error