S004 SUB、FUNCTION またはプロパティが定義されていません

サブルーチンか関数を Declare ステートメントで宣言して呼び出そうとしましたが、Sub か Function ステートメントで定義されていませんでした。

関数かサブルーチンを定義してください。