On Error ステートメントで、数値定数がエラー番号として使用されましたが、整数ではありません。On Error ステートメントでエラー番号として使用される定数は整数でなければなりません。
数値定数を整数に変更してください。