Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


67211 / 76733 ←次へ | 前へ→

【14081】Re:変数の宣言を強制する
質問  WAKO  - 04/5/20(木) 16:25 -

引用なし
パスワード
   ▼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のコンパイル
>を実行して、全ての文法エラーをなくしてから実行されることをお薦めします。

2 hits

【14076】変数の宣言を強制する WAKO 04/5/20(木) 15:53 質問
【14077】Re:変数の宣言を強制する Asaki 04/5/20(木) 16:00 回答
【14081】Re:変数の宣言を強制する WAKO 04/5/20(木) 16:25 質問
【14082】Re:変数の宣言を強制する Asaki 04/5/20(木) 16:31 回答
【14084】Re:変数の宣言を強制する WAKO 04/5/20(木) 17:08 質問
【14085】Re:変数の宣言を強制する Jaka 04/5/20(木) 17:19 回答
【14162】Re:変数の宣言を強制する WAKO 04/5/22(土) 13:09 質問
【14186】Re:変数の宣言を強制する よろずや 04/5/22(土) 17:46 回答
【14198】Re:変数の宣言を強制する WAKO 04/5/23(日) 14:03 質問
【14211】Re:変数の宣言を強制する よろずや 04/5/23(日) 20:30 回答
【14217】Re:変数の宣言を強制する WAKO 04/5/23(日) 23:05 質問
【14231】Re:変数の宣言を強制する IROC 04/5/24(月) 10:42 回答
【14249】Re:変数の宣言を強制する Jaka 04/5/24(月) 15:04 発言
【14262】Re:変数の宣言を強制する よろずや 04/5/24(月) 22:28 発言
【14278】Re:変数の宣言を強制する POP 04/5/25(火) 13:01 質問
【14279】Re:変数の宣言を強制する よろずや 04/5/25(火) 13:16 回答

67211 / 76733 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free