Excel VBA質問箱 IV

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

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


67135 / 76738 ←次へ | 前へ→

【14162】Re:変数の宣言を強制する
質問  WAKO  - 04/5/22(土) 13:09 -

引用なし
パスワード
   ▼Jaka さん:
すいません、返信が遅くなりまして、
シート1の中のマクロはこのようになります。

Private Sub CommandButton4_Click()

Call Modoru

End Sub
Private Sub CommandButton3_Click()

Call CsvHozon

End Sub
Private Sub CommandButton2_Click()

Call ErrKensaku

End Sub
Private Sub CommandButton1_Click()

Call ErrChk

End Sub
Option Explicit

上のOption Explicitで落ちます。モジュールではないので
▼Jaka さんの書かれたソースの"作成Module"
の所はどのようにいれればよろしいか分かりますか
すいませんが分かるようでしたら教えて下さい。


▼Jaka さん:
>Sub monmon()
>  Dim obj作成Moju As Object
>  Set obj作成Moju = ActiveWorkbook.VBProject.VBComponents.Add(ComponentType:=1)
>  obj作成Moju.Properties("Name").Value = "作成Module"
>  DoEvents
>  
>  With ActiveWorkbook.VBProject.VBComponents("作成Module").CodeModule
>    .InsertLines 1, "Public mon AS String"
>    .Deletelines 1, .Countoflines
>    .InsertLines 1, "sub bubu()" & vbCrLf & _
>             "msgbox 555" & vbCrLf & _
>             "end sub "
>  End With
>End Sub
0 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 回答

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