ExecuteExcel4Macroについて
ExecuteExcel4Macroは、Excel4.0のマクロを実行します。
つまり、昔のマクロを使うということです。
VBAが使える前にあったものですが、最新バージョンのエクセルでも使用できます。
MSもVBAへの移行を勧めています。
VBAで困った時の、手段の一つとしては、考えても良いかもしれません。
そこで、簡単に説明する事にしました。
他ブックのデータを、ブックを開かずに取得する
Range("A1") = ExecuteExcel4Macro("'C:\Excel\[test.xls]Sheet1'!R1C2")
上記を実行すると、「C:\Excel\test.xls」のシート「Sheet1」のA1セルの値を取得します。
ブックを開かないので、VBAで普通にブックを開いて取得する場合に比べると格段に速いです。
しかし、この場合は、1つづつのセルしか取得できません、複数セルを一括で取得できないです。
ですから、複数セルの取得が必要で、そのセル数が多い時は、逆にこれでは遅くなってしまう事もあり得ます。
また、関数を使う事も出来ます。
Range("A1") = ExecuteExcel4Macro("AVERAGE('C:\[test.xls]Sheet1'!R1C1:R10C1)")
このように関数を使えますので、使い方によっては、大変便利で、高速に動作します。
文字列としての計算式を計算する
Excel 4.0のコマンドにEVALUATEがあります。
実際に使うことはないと思いますが、参考として紹介しておきます。
Dim strCalc As String
strCalc = "(10+20)*2"
Range("A1") = ExecuteExcel4Macro("EVALUATE(" &
strCalc & ")")
上記を実行すると、A1セルに「60」とし入ります。
EVALUATE関数は、文字列としての数式を計算してくれます。
この機能は、代替えがありませんので、
このような必要性に迫られたら、真っ先に検討に値すると思います。
上記は、以下のように書くことができます。
Dim strCalc As String
strCalc = "(10+20)*2"
Range("A1") = Evaluate(strCalc)
ExecuteExcel4Macroの使用例
Excelファイルを開かずにシート名を取得|VBAサンプル集
リボンを非表示、2003以前ならメニューを非表示
ExecuteExcel4Macroの最後に
既に詳しい解説資料もほとんどないですし、
いつサポートされなくなるか分かりませんので、なるべく使わない方が良いでしょう。
よほど、特殊な事情があり、Excel4Macroなら簡単に解決できそうな場合にのみ検討して下さい。
同じテーマ「マクロVBA技術解説」の記事
マクロ作成後に表位置がずれた場合の対処
ExecuteExcel4Macroについて
再帰呼出しについて(再帰プロシージャー)
フィボナッチ数列(再帰呼び出し)
文字列でのセル参照と文字列の計算式について(Evaluate,INDIRECT)
リボンを非表示、2003以前ならメニューを非表示
印刷ページ設定の余白をセンチで指定する(CentimetersToPoints)
文字列としてのプロシージャー名を起動する方法(Run,OnTime)
ドキュメントの作成者を取得(GetObject,BuiltinDocumentProperties)
画像サイズ(横x縦)の取得について
文字種(ひらがな、全半角カタカナ、半角英大文字等々)の判定
新着記事NEW ・・・新着記事一覧を見る
VBA100本ノック 99本目:自動席替え(行列と前後左右が全て違うように)|VBA練習問題(3月2日)
VBA100本ノック 98本目:席替えルールが守られているか確認|VBA練習問題(3月1日)
VBA100本ノック 97本目:Accessからデータを取得2|VBA練習問題(2月27日)
VBA100本ノック 96本目:Accessからデータを取得1|VBA練習問題(2月26日)
VBA100本ノック 95本目:図形のテキストを検索するフォーム作成|VBA練習問題(2月24日)
VBA100本ノック 94本目:表範囲からHTMLのtableタグを作成|VBA練習問題(2月23日)
VBA100本ノック 93本目:複数ブックを連結して再分割|VBA練習問題(2月22日)
VBA100本ノック 92本目:セルの色を16進で返す関数|VBA練習問題(2月20日)
VBA100本ノック 91本目:時間計算(残業時間の月間合計)|VBA練習問題(2月19日)
VBA100本ノック 90本目:セルに重なっている画像の削除|VBA練習問題(2月17日)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.変数宣言のDimとデータ型|VBA入門
4.マクロって何?VBAって何?|VBA入門
5.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
6.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
7.繰り返し処理(For Next)|VBA入門
8.セルに文字を入れるとは(Range,Value)|VBA入門
9.マクロはどこに書くの(VBEの起動)|VBA入門
10.とにかく書いてみよう(Sub,End Sub)|VBA入門
- ホーム
- マクロVBA応用編
- マクロVBA技術解説
- ExecuteExcel4Macroについて
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。