(エラーメッセージ)
5 VBAProject プロシージャの呼び出し、または引数が不正です。
Err オブジェクトの Number プロパティに 0 を設定することはできません(マイナスは可)。エラーコードが定数でない場合は 0 を代入していないことを確認してください。
Err.Raise Number:=0, Description:="Test Error"
関連する資料のリンク
Err オブジェクト (Visual Basic)
http://msdn.microsoft.com/ja-jp/library/ka13cy19.aspx