Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

69235 / 76738

←次へ　｜　前へ→


	【12021】Re:マクロの選択方法

こうちゃん

- 04/3/22(月) 13:20 -


	引用なし

	パスワード

ﾀｶさん、こんにちは

こんな感じです・・・

>InputBoxを使用し、複数のマクロから使用するマクロを選択したいのですが
>方法がわかりません。
>どなたかご教授願います。
>
>マクロは３個あり　Macro1()=1、Macro2()=2、Macro3()=3　と置き換えてInputBoxで数値を入力してマクロを選択します。
>
>少しだけ作ってみましたが？
>
>Sub Macro4()
>'
>' Macro4 Macro
>' マクロ記録日 : 2004/3/22　ユーザー名 :
>'
>
>'
>　Worksheets("Sheet1").Activate
>　Dim myStr1 As String
>
>　myStr1 = Application.InputBox("　Macro1()=1　Macro2()=2　Macro3()=3, "訂マクロ選択入力", Type:=2)

　　myStr1 = Application.InputBox("Macro1()=1　Macro2()=2　Macro3()=3", "訂マクロ選択入力", Type:=2)
　　
　　Select Case myStr1
　　　　Case "1"
　　　　　　Call Macro1
　　　　Case "2"
　　　　　　Call Macro2
　　　　Case "3"
　　　　　　Call Macro3
　　　　Case Else
　　　　　　MsgBox "処理を中止します。"
　　End Select
>・
>・
>・
> End Sub

0 hits

▼

【12019】マクロの選択方法 ﾀｶ 04/3/22(月) 13:11