|
▼Asaki さん:
こんにちは。
そうなのですが、実はマクロでマクロを記述する
事をやっており、チェックが入っていると
マクロでマクロを記述した内容の一番後ろに
Option Explicitが書かれるので、実行するとコンパイルエラーになるのです。
書く内容は、下の通りです。
With ThisWorkbook.VBProject.VBComponents.Item("Sheet1").CodeModule
.InsertLines 1, "Private Sub CommandButton1_Click()"
.InsertLines 2, ""
.InsertLines 3, "Call ErrChk"
.InsertLines 4, ""
.InsertLines 5, "End Sub"
End With
With ThisWorkbook.VBProject.VBComponents.Item("Sheet1").CodeModule
.InsertLines 1, "Private Sub CommandButton2_Click()"
.InsertLines 2, ""
.InsertLines 3, "Call ErrKensaku"
.InsertLines 4, ""
.InsertLines 5, "End Sub"
End With
With ThisWorkbook.VBProject.VBComponents.Item("Sheet1").CodeModule
.InsertLines 1, "Private Sub CommandButton3_Click()"
.InsertLines 2, ""
.InsertLines 3, "Call CsvHozon"
.InsertLines 4, ""
.InsertLines 5, "End Sub"
End With
With ThisWorkbook.VBProject.VBComponents.Item("Sheet1").CodeModule
.InsertLines 1, "Private Sub CommandButton4_Click()"
.InsertLines 2, ""
.InsertLines 3, "Call Modoru"
.InsertLines 4, ""
.InsertLines 5, "End Sub"
End With
だれか、防ぐ方法を教えて下さい
▼Asaki さん:
>こんにちは。
>
>チェックをつけておいたほうが、のちのち困りません。
>
>一度、メニューから デバッグ >> VBAProjectのコンパイル
>を実行して、全ての文法エラーをなくしてから実行されることをお薦めします。
|
|