VBA100本ノック 55本目:他ブックのマクロを起動
他ブックを開いて、開いたブックのマクロを起動する問題です。
ツイートでの見やすさを考慮して、ブック・シート指定等を適宜省略しています。
出題
以下のVBAを作成。
・ブックと同一フォルダの"test.xlsm"を「Workbook_Open」を実行せずに開く
・test.xlsmのModule1のFunction multに任意の数値を2つ渡して結果を受け取る
・test.xlsmを閉じる
・受け取った結果をMsgBoxで表示する
※test.xlsmのVBAは画像とリプにて

'Bookモジュール
Private Sub Workbook_Open()
MsgBox "失敗"
End Sub
'Module1
Function mult(num1, num2)
mult = num1 * num2
End Function
VBA作成タイム
この下に頂いた回答へのリンクと解説を掲載しています。
途中まででも良いので、できるだけ自分でVBAを書いてみましょう。
他の人の回答および解説を見て、書いたVBAを見直してみましょう。
頂いた回答
解説
他ブックのマクロを起動するには[Application.]Runを使います。
multが他モジュールにも存在する可能性があるならモジュール名で修飾してください。
確実にEnableEventsをTrueに戻すためにOn Errorを入れています。
Sub VBA100_55_01()
On Error Resume Next
Application.ScreenUpdating = False
Application.EnableEvents = False
Dim rtn As Variant, errMsg As String
With Workbooks.Open(Filename:=ThisWorkbook.Path & "\test.xlsm", ReadOnly:=True)
If Err.Number = 0 Then
rtn = Application.Run(.Name & "!mult", 3, 4)
.Close SaveChanges:=False
End If
End With
If Err Then
MsgBox Err.Description
Else
MsgBox rtn
End If
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
補足はありません。
補足
サイト内関連ページ
同じテーマ「VBA100本ノック」の記事
52本目:複数シートの一括印刷
53本目:テーブルの扱いと年齢計算
54本目:シートのChangeイベント
55本目:他ブックのマクロを起動
56本目:数式内の自身のシート名を消す
57本目:ファイルの更新日時
58本目:番号リストを簡潔にした文字列で返す
59本目:12ヶ月分のシートを四半期で分割
60本目:「株式会社」の表記ゆれ置換
61本目:「ふりがな」の取得と設定
62本目:独自のZLOOKUP関数を作成
新着記事NEW ・・・新着記事一覧を見る
イータ縮小ラムダ(eta reduced lambda)|エクセル入門(2023-11-20)
PIVOTBY関数(縦軸と横軸でグループ化して集計)|エクセル入門(2023-11-19)
GROUPBY関数(縦軸でグループ化して集計)|エクセル入門(2023-11-18)
PY関数(Pythonコードをセル内で実行)|エクセル入門(2023-11-17)
画像「セルに配置」のVBAについて(365の新機能)|VBA技術解説(2023-11-13)
スピルのゴーストの範囲を選択するVBA|ツイッター出題回答 (2023-10-31)
エクセル試験3:月間の所定労働時間|エクセル練習問題(2023-10-04)
エクセル試験2:所得税の計算|エクセル練習問題(2023-10-04)
エクセル試験1:曜日別の平均客単価|エクセル練習問題(2023-10-04)
列全体を指定する時のRangeとColumnsの違い|ツイッター出題回答 (2023-09-24)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.繰り返し処理(For Next)|VBA入門
4.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
5.変数宣言のDimとデータ型|VBA入門
6.条件分岐(IF)|VBA入門
7.ブックを閉じる・保存(Close,Save,SaveAs)|VBA入門
8.並べ替え(Sort)|VBA入門
9.マクロとは?VBAとは?VBAでできること|VBA入門
10.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
- ホーム
- マクロVBA入門編
- VBA100本ノック
- 55本目:他ブックのマクロを起動
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。