下記のマクロを実行すると指定フォルダ内
「C:\Users\160931\Desktop\テスト\」
の指定ファイル
「テストチェックリスト.xlsm」
の別ブックの
マクロ
「チェック」
を実行できますが、
実行マクロを複数設定出来る方法を教えてください。
例えば
「チェック」「チェック2」「チェック3」
現状のマクロ
Sub 別ブックマクロ実行()
Const FILE_NAME = "C:\Users\160931\Desktop\テスト\テストチェックリスト.xlsm"
Const PROC_NAME = "チェック"
Dim app
Set app = CreateObject("Excel.Application")
With app
'Excel非表示
.Visible = False
Dim wb
Set wb = .Workbooks.Open(FILE_NAME)
.Run wb.Name & "!" & PROC_NAME
'アラートを消す
.DisplayAlerts = False
wb.Save
wb.Close
End With
app.Quit
End Sub
以上となります。
宜しくお願い致します。
No.2ベストアンサー
- 回答日時:
Const PROC_NAME = "チェック"
を消して
Dim wb
と
'アラートを消す
の間に、
Const PROC_NAME = "チェック"
Set wb = .Workbooks.Open(FILE_NAME)
.Run wb.Name & "!" & PROC_NAME
これを1セットとして、
「チェック」の部分を書き換えた3セットを続けて書き込む。
No.1
- 回答日時:
> 実行マクロを複数設定出来る方法を教えてください。
あなたはどうすれば複数設定出来ると考えましたか?
それやってみて、うまく動かなかったり、エラーが出てから質問しませんか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/02/04 12:47
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/11/09 11:51
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/13 08:41
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2024/03/26 18:09
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) 【マクロ】フォルダにファイルが1つも無い時に、ファイルがありませんとメッセージを表示する 4 2022/08/28 08:48
- Excel(エクセル) 【マクロ】マクロが保存されているエクセルとは、別のエクセルブックの全シートの非表示列を再表示したい 1 2022/12/24 20:48
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/02/17 11:59
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/07/01 12:54
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/10 11:34
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Excel-VBAのmsgBox()の不思議
Visual Basic(VBA)
-
Excel VBA 定義されたプロージャ名、関数名の取得
Visual Basic(VBA)
-
VBAなくなるの?
Visual Basic(VBA)
-
-
4
引数に数値、文字列の混在
Visual Basic(VBA)
-
5
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
6
左右の表のキー位置を合わせたい
Visual Basic(VBA)
-
7
VBAを使用した時間管理
Visual Basic(VBA)
-
8
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
9
VBAに詳しい方教えてください。
Visual Basic(VBA)
-
10
Excelのマクロについて教えてください。
Visual Basic(VBA)
-
11
VBA 複数条件の分岐処理の上手な方法
Visual Basic(VBA)
-
12
【ExcelVBA】値を変更しながら連続でPDFを作成し,それらを結合した状態で出力するコード
Visual Basic(VBA)
-
13
VBA一覧取得 再投稿
Visual Basic(VBA)
-
14
ExcelVBAのFindFirstエラーについて
Visual Basic(VBA)
-
15
近似した文字列を置換するエクセル関数またはVBAについて
Visual Basic(VBA)
-
16
for 文の 繰り返し処理に使えるのかどうかについて
Visual Basic(VBA)
-
17
Excel関数またはVBAでの質問になります
Visual Basic(VBA)
-
18
IEを使わないでhtmlテキストを取得したい(VB.Net)
Visual Basic(VBA)
-
19
ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-
20
エクセルVBAにて =A1=B1とすれば A1とB1のセル内容が一緒だった場合 TRUE 違っていれ
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel・Word リサーチ機能を無...
-
特定のPCだけ動作しないVBAマク...
-
エクセルで特定の列が0表示の場...
-
メッセージボックスのOKボタ...
-
一つのTeratermのマクロで複数...
-
Excel マクロ VBA プロシー...
-
ExcelのVBA。public変数の値が...
-
TERA TERMを隠す方法
-
Excel マクロでShearePoint先の...
-
ExcelVBAでPDFを閉じるソース
-
非表示の列をすべて削除するマクロ
-
マクロ実行時、ユーザーフォー...
-
エクセルに張り付けた写真のフ...
-
#defineの定数を文字列として読...
-
Excelマクロを引数付で起動
-
Excel VBAからAccessマクロを実...
-
EXCELのVBAでRange("A1:C4")を...
-
ピボットテーブルでの毎回可変...
-
バッチファイルでEXCELを起動し...
-
accessで未入力の場合にメッセ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel・Word リサーチ機能を無...
-
特定のPCだけ動作しないVBAマク...
-
エクセルで特定の列が0表示の場...
-
Excel マクロ VBA プロシー...
-
メッセージボックスのOKボタ...
-
一つのTeratermのマクロで複数...
-
ExcelのVBA。public変数の値が...
-
Excel VBAからAccessマクロを実...
-
TERA TERMを隠す方法
-
ExcelVBAでPDFを閉じるソース
-
エクセルに張り付けた写真のフ...
-
EXCELのVBAでRange("A1:C4")を...
-
エクセルで別のセルにあるふり...
-
ソース内の行末に\\
-
マクロ実行時、ユーザーフォー...
-
特定文字のある行の前に空白行...
-
エクセルVBA
-
マクロの記録を使用したマクロ...
-
wordを起動した際に特定のペー...
-
ダブルクリックで貼り付けた画...
おすすめ情報
回答ありがとうございました。
記者の教えて頂いたコードを設定しましたが、
「コンパイルエラー」同じ適用範囲内で宣言が重複しております。
とエラーメッセージが表示され
コードの
「Const PROC_NAME = "チェック2"」の部分の
「PROC_NAME = 」が変色しており
マクロを実行できませんでした。
解決方法を教えてください。
宜しくお願い致します。
ご連絡ありがとうございました。
上手くできました。