ベストアンサー

VBからエクセルマクロを実行したい

2009/05/05 23:24

VB2008でコマンドボタンを押すと現在開いているエクセルファイル（test.xls）のマクロ1を実行させることは可能でしょうか？できればコードを教えていただける助かるのですが、、、よろしくお願いします。

lokijuh
お礼率99% (499/500)

Visual Basic
回答数1
ありがとう数1

みんなの回答 （1）
専門家の回答

質問者が選んだベストアンサー

ベストアンサー

tom11
ベストアンサー率53% (134/251)

2009/05/06 13:21 回答No.1

こんにちは、試してみませんが。以下のページを応用すれば出来るような気がしますが。 http://support.microsoft.com/kb/219905/ja

質問者

お礼 2009/05/06 19:10

やってみます。ありがとうございます。

関連するQ&A

VBからマクロの実行について

下記のようにVBよりエクセルマクロの実行を行っています。マクロに引数を持たしたいのですが、以下のように記述すると記述エラーが発生します。引数をもっているマクロはVBから呼び出すことはできないのでしょうか？よろしくお願いいたします。引数を持たせない場合はエラーが起こらない objExcl.Run ("Macro1.xls" & "!" & "Macro1") マクロ側に引数を持たして、以下のように記述するとエラーになる objExcl.Run ("Macro1.xls" & "!" & "Macro1(引数)")
VBからEXCELを起動する

VBよりExcelを起動するプログラムで困っています。１．VBよりGetObject関数でTest.xlsを開く２．Test.xls内のAuto_Openマクロでパラメータファイルをよみ、そこに指定されているエクセルファイルを新しいブックでを開くということをしたいのですが(「マクロを有効にする」のダイアログは表示されてもかまわないです)、何故かTest.xlsが開いたと思ったらすぐ閉じてしまいます(Excel自体は終了してないですべてのワークシートが閉じた状態)。 Auto_Openマクロは走ってるようなのですが、ついでにCloseマクロも走ってしまいます。ちなみにTest.xlsを単体で動かしたときは問題なく動くのです・・・。以前はVB4＋Excel95の環境でAPI(CreateProcess)を使用し同作業を行っていたのですが、そのAPIが長いファイル名のスペース(OFFICEがある「Program File」のスペース)を認識しないそうで、この方法が使えないということでGetObjectを使用してみたのですが・・・。何か根本的な間違いをしているのか、それともコードにエラーがあるのかさっぱりわからずお手上げです。うまく疑問点を説明できているか不安なんですが、わかる方、どうかご指導願います。よろしくお願いします。 ---------------------------------------- ＯＳは、Windows 2000 アプリケーションは、Excel 2000 です ----------------------------------------
エクセル：マクロ処理

エクセルファイルにマクロを入れておき、あるボタンを押したらそのマクロが1回だけ実行される。というようにしたい。（質問）　　ボタンは、どう作るか。コマンドで作るのか。　　ボタン処理のところのマクロ記述はどんな感じのコードか。　　このファイルを開いたときマクロを有効とするかは有効にするでいいんですよね。（参考）ワークシート　　ボタン１を表示しておく　マクロ　　ボタン処理　　実行処理マクロｅｎｄ
ExcelマクロでVBエディタの自動化は出来ない？

Excelのマクロで、VBエディタの操作を自動化したいと考えていますが、出来ないのでしょうか？マクロの記録では VBエディタの操作は一切記録されないようです。バージョンは Excel2003 です。具体的には、全てのマクロのコードをテキストファイルに吐き出したいと考えています。ファイルメニューのエクスポートでも、コードウィンドウ１つ１つを "全てを選択" でも、Excelのマクロから実行させることは出来ないのでしょうか？よろしくお願いします。
Excelマクロの[実行]ボタンが押せなくなった

今までちゅんと使えていたExcel2000マクロを、[ツール]-[マクロ]のマクロ画面から実行しようとしたら、[作成]以外のボタンがグレーになって押せなくなっていました。そのマクロ自体は何も変更していません。しいていうと、コードを別のところにコピーするためにVBエディタでコード表示させました。今もちゃんとコードはあります。また実行できるようにする方法はありますか。VBエディタはほとんど使わないので、修復方法の見当がつきません・・・よろしくお願いします。
vbスクリプトについて

Excelファイル（D:\test.xls）を再起動するvbスクリプトを作成し、４時間おきに実行するタスクスケジュールを設定したいと思います。 ※6:00、10:00、14:00、18:00、22:00、2:00のタスクスケジュールを作成し、　vbスクリプトを実行。次のタスクスケジュールが実行されるまでの４時間は、Excelファイル（D:\test.xls）は開いたままの状態です。なので、vbスクリプトで、まずExcelファイル（D:\test.xls）が開いている場合は、「D:\test.xls」を一旦（上書き保存なしで）閉じて、再度、「D:\test.xls」を開きたいと思っています。 ※他のExcelファイルが開いている場合は、「D:\test.xls」のみ閉じる。「D:\test.xls」を開くスクリプトはできたのですが、「D:\test.xls」を閉じるところがわかりません。どなたか教えていただけないでしょうか。【vbスクリプト】----------------------------------------- '「D:\test.xls」が開いている場合は閉じる　？？？ '「D:\test.xls」を起動する Dim xlApp Dim xlWbk Set xlApp=CreateObject("Excel.Application") xlApp.Visible=True Set xlWbk=xlApp.Workbooks.open("D:\test.xls",True) ---------------------------------------------------------
EXCELマクロでVB6.0のコードを使う方法

OSはWin XP Home, EXCEL2002を使用しています。又、開発ツールはVB6.0とVB.Netの両方を持っています（持っているだけで、ほとんど使ったことはありません）。現在、EXCELでマクロを作っているのですが、足りない機能があり、知り合いから「自由に使っていいよ」という事でVB6.0のソースコードをもらいました。このソースコードは単体で動かすと、自分の欲しい機能が全て含まれています。これをうまくエクセルマクロに取り込める方法はないでしょうか？受け取ったソースコードを私が理解できれば、EXCELで動くように書き換えられるのですが、内容が難しいため実行不可能な状況です。何かいいアドバイスがあればお願いいたします。
【Excel2003】マクロの実行

お世話になります。フォルダー内全てのエクセルファイルに、あるマクロを実行したいのですが可能でしょうか？例としましてはフォルダー「変更ファイル」以下中にあるファイル ------------------------ ファイル「A.ｘｌｓ」ファイル「B.ｘｌｓ」ファイル「C.ｘｌｓ」ファイル「マクロ.ｘｌｓ」←ソートを行うマクロ入り ------------------------ 「変更ファイル」フォルダー内の「マクロ.xls」を実行してA,B,Cファイル（フォルダー内全てのファイル）内データーを各ファイル毎ソートしたい。この作業はマクロ.ｘｌｓのマクロをカスタマイズしてすることは可能でしょうか？可能ならやり方を教えてください。お願いいたします。
別ファイルからのマクロ実行

Excelファイルにコマンドボタンを設定し、別ファイルのマクロを実行したいのですが、この動作は可能なんでしょうか？マクロの動作設定はしていて、マクロ実行の動きを行いたいのです。お分かりの方がいらっしゃいましたら、ご回答よろしくお願いします。
どのファイルを開いた時もマクロを自動実行。エクセル

新規にエクセルを開いたときだけマクロを自動実行するには、 personal.xlsで Sub auto_open() ' Macro1 Macro Range("A1").Value = "111" End Sub とすれば良いかと思いますが、新規に開くどのファイルに対しても　ファイル名ＡＢＣ　を含んでいる時だけマクロを自動的に実行するにはどうしたらよいでしょうか？（ファイルを開いてから　マクロボタンを押して　マクロに”ファイル名をチェックしてA1にデータを書き込む”があるのはだめです。）（アドインでツールバーボタンを押すのもだめです。）エクセルは２００３　OSはＸＰです。説明不足でしたらすみません。
【マクロ】指定したファイルを開いてマクロを実行

マクロ初心者です。よろしくお願いします。＜質問＞コマンドボタンをクリックしたら、任意のエクセルファイルを指定して開き、その開いたファイル(白紙状態のファイル)にマクロを実行させる方法を探してます。＜作成マクロ＞ Private Sub CommandButton1_Click() Dim OpenFileName As String OpenFileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls") If OpenFileName <> "False" Then Workbooks.Open OpenFileName End If Workbooks(Dir(OpenFileName)).Activate ActiveCell.FormulaR1C1 = "テスト" Range("A1").Select Selection.Copy Range("B1").Select ActiveSheet.Paste End Sub ＜マクロ説明＞ --コマンドボタンをクリックして指定したエクセルファイルを開く-- Private Sub CommandButton1_Click() Dim OpenFileName As String OpenFileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls") If OpenFileName <> "False" Then Workbooks.Open OpenFileName End If Workbooks(Dir(OpenFileName)).Activate --開いたエクセルファイル(白紙状態)のセルA1に「テスト」を入力した後、コピーしセルB2に貼り付ける-- 　 ActiveCell.FormulaR1C1 = "テスト" Range("A1").Select Selection.Copy Range("B1").Select ActiveSheet.Paste End Sub コマンドボタンをクリック ↓ 任意のエクセルファイルを指定して開く ↓ 開いたファイル(白紙状態のファイル)のセルA1に「テスト」と書き込みセルA1の「テスト」をコピーしセルB1に貼り付けるこのマクロを実行させるにはどこを改善すれば良いでしょうか？ご助言いただけると助かります。よろしくお願い致します。
【マクロ】指定したファイルを開いてマクロを実行

マクロ初心者です。よろしくお願いします。＜質問＞コマンドボタンをクリックしたら、任意のエクセルファイルを指定して開き、その開いたファイル(白紙状態のファイル)にマクロを実行させる方法を探してます。＜作成マクロ＞ Private Sub CommandButton1_Click() Dim OpenFileName As String OpenFileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls") If OpenFileName <> "False" Then Workbooks.Open OpenFileName End If Workbooks(Dir(OpenFileName)).Activate ActiveCell.FormulaR1C1 = "テスト" Range("A1").Select Selection.Copy Range("B1").Select ActiveSheet.Paste End Sub ＜マクロ説明＞ --コマンドボタンをクリックして指定したエクセルファイルを開く-- Private Sub CommandButton1_Click() Dim OpenFileName As String OpenFileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls") If OpenFileName <> "False" Then Workbooks.Open OpenFileName End If Workbooks(Dir(OpenFileName)).Activate --開いたエクセルファイル(白紙状態)のセルA1に「テスト」を入力した後、コピーしセルB2に貼り付ける-- 　 ActiveCell.FormulaR1C1 = "テスト" Range("A1").Select Selection.Copy Range("B1").Select ActiveSheet.Paste End Sub コマンドボタンをクリック ↓ 任意のエクセルファイルを指定して開く ↓ 開いたファイル(白紙状態のファイル)のセルA1に「テスト」と書き込みセルA1の「テスト」をコピーしセルB1に貼り付けるこのマクロを実行させるにはどこを改善すれば良いでしょうか？ご助言いただけると助かります。よろしくお願い致します。
Office2007のマクロ実行について

Office2007のマクロ実行についてユーザー登録以前にはマクロ実行は出来ないのでしょうか？アップグレードを入れて2007を使おうとしました。ユーザー登録をするのはよいのですが、後でも出来るのでとりあえず使って見ようとしました。しかし、Excel2003で作ったマクロの入っているxlsファイルをExcel2007のマシンに入れたところ、一般機能は普通に出来るのですが、マクロを登録したボタンをクリックしても反応しません。また、ファイルオープン時にマクロを実行するかどうかも聞いてきません。もしかすると、ユーザー登録以前にはマクロの実行は出来ないのかと思いました。ご存知の方お教えください。
VB.Net2002からExcelマクロは実行できますか？

VBからExcelを起動しシートに値を書き込みます．（ここまではＯＫ）その後，そのExcelのマクロを実行させたいのですが可能でしょうか？また，マクロのセキュリティレベルは「中」なのですが，マクロの含んだExcelを起動させる際のメッセージ画面を非表示（暗黙的に「ＯＫ」を押す）ということは可能なのでしょうか？
ＥＸＣＥＬのマクロについて

excel2000(sr1)で、コマンドボタンのクリックによって、VBを実行させます。 AのPCでは正しく実行できたのですが、BのPCではコマンドボタンがクリックできません。（ボタンを貼り付けた状態になっている）「ツール」－「マクロ」－「VB EDITOR」で、ソースを確認することはできます。原因は何でしょうか？
■　エクセルマクロについてです。初級？

エクセルのマクロでデスクトップにあるエクセルファイルを開くにはどうしたらいいのでしょうか？現在は、エクセルファイルＡ.xls Ｂ.xlsという２つを開いていて、マクロを実行することができるのですが、これをＡ.xlsだけ開いている上体で、実行したいのです。なので、デスクトップに置いてあるＢ．xlsファイルを開くコマンド？というか、関数が知りたいのですが、どうしたらいいのでしょうか？現在はこのような感じになっております。 Sub Macro2() ' ' Macro2 Macro ' マクロ記録日 : 2008/9/10 ユーザー名 : ' ' ActiveCell.FormulaR1C1 = "12345" Range("G17").Select ActiveCell.FormulaR1C1 = "129876" Range("G18").Select Windows("Ｂ.xls").Activate Range("N16").Select ActiveCell.FormulaR1C1 = "8/4/2008" Range("N17").Select ActiveWorkbook.Save Range("O16").Select ActiveWorkbook.Save ActiveWindow.Close End Sub
エクセル　マクロについて

自動マクロで作成したマクロのモジュールをコマンドボタンのコードに貼り付けたのですが実行できません。自動マクロからでは実行できるのですが。。。
エクセルのマクロで別ファイル（エクセル）のマクロを実行させるには？

エクセルにおいてマクロを組んでいます．１．実行させたいマクロAが組んであるファイル（Aファイルとします）が多数あります。またマクロAはモジュール内（Module1）に作っております。２．１のマクロAを別のエクセルファイル（Bファイルとします）のマクロBで実行させたい．上記のようなことを行いたいのですが可能でしょうか？さらに言えば、マクロBによってマクロAのプロシージャを指定して実行させることは出来るでしょうか？現在は、マクロBによってマクロAを組んであるAファイルを開き、Aファイルのマクロの中にファイルを開いたときにマクロAを実行させる（イベントドリブン）ようにしています．直接、マクロBでAファイルのマクロAを動かせるようになればマクロAにイベントドリブンなコードを組む手間がなくなるので、なんとかそのような事が出来ないでしょうか？どうか、詳しい方ご教授ください。よろしくお願いいたします。。。
VB2005.NETプログラムから、エクセル2007へのマクロ実行を無効にしたい。

＜PC1 動作環境＞・OS :Vista Business ・ソフト:office2007 Excel ＜PC2 動作環境＞・OS :Vista Ultimate ・ソフト:office2007 Excel ＜目的＞ VB2005.NETで開発したプログラムから、エクセルのセルに値を入れるソフト開発しており、エクセル側にマクロを仕込み動かしています。 VB側から、エクセルのマクロを動かしたくない場合があります。セキュリティセンター⇒マクロの設定⇒警告を表示して全てのマクロを無効にするを選択しました。＜問題＞ PC1では、VB側から、エクセルのマクロが実行できなくなりますが、 PC2では、VB側から、エクセルのマクロが実行できてしまう。 PC2でも、VB側から、エクセルのマクロを実行しないようにしたいのですが、どなたか解決方法を知っている方いませんでしょうか。宜しくおねがい致します。
アクセスからエクセルのマクロを実行したいのですが

Sub エクセルのVBA実行する() Dim xlsWB As Object Dim MyFileName As String MyFileName = "C:\test.xlsx" Set xlsWB = GetObject(MyFileName) xlsWB.Application.Run xlsWB.Name & "!マクロ" Set xlsWB = Nothing End Sub と言うコードを作ったのですがエクセルファイルにはパスワードがかかっています。パスワード付のエクセルファイルを開きマクロを実行するにはどうすればいいでしょうか？

VBからエクセルマクロを実行したい

質問者が選んだベストアンサー

お礼 2009/05/06 19:10

関連するQ&A

VBからマクロの実行について

VBからEXCELを起動する

エクセル：マクロ処理

ExcelマクロでVBエディタの自動化は出来ない？

Excelマクロの[実行]ボタンが押せなくなった

vbスクリプトについて

EXCELマクロでVB6.0のコードを使う方法

【Excel2003】マクロの実行

別ファイルからのマクロ実行

どのファイルを開いた時もマクロを自動実行。エクセル

【マクロ】指定したファイルを開いてマクロを実行

【マクロ】指定したファイルを開いてマクロを実行

Office2007のマクロ実行について

VB.Net2002からExcelマクロは実行できますか？

ＥＸＣＥＬのマクロについて

■　エクセルマクロについてです。初級？

エクセル　マクロについて

エクセルのマクロで別ファイル（エクセル）のマクロを実行させるには？

VB2005.NETプログラムから、エクセル2007へのマクロ実行を無効にしたい。

アクセスからエクセルのマクロを実行したいのですが

注目のQ&A

カテゴリ
一覧

専門家に質問してみよう
専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

VBからエクセルマクロを実行したい

質問者が選んだベストアンサー

お礼 2009/05/06 19:10

関連するQ&A

VBからマクロの実行について

VBからEXCELを起動する

エクセル：マクロ処理

ExcelマクロでVBエディタの自動化は出来ない？

Excelマクロの[実行]ボタンが押せなくなった

vbスクリプトについて

EXCELマクロでVB6.0のコードを使う方法

【Excel2003】マクロの実行

別ファイルからのマクロ実行

どのファイルを開いた時もマクロを自動実行。エクセル

【マクロ】指定したファイルを開いてマクロを実行

【マクロ】指定したファイルを開いてマクロを実行

Office2007のマクロ実行について

VB.Net2002からExcelマクロは実行できますか？

ＥＸＣＥＬのマクロについて

■ エクセルマクロについてです。初級？

エクセル マクロについて

エクセルのマクロで別ファイル（エクセル）のマクロを実行させるには？

VB2005.NETプログラムから、エクセル2007へのマクロ実行を無効にしたい。

アクセスからエクセルのマクロを実行したいのですが

注目のQ&A

カテゴリ 一覧

専門家に質問してみよう 専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

■　エクセルマクロについてです。初級？

エクセル　マクロについて

カテゴリ
一覧

専門家に質問してみよう
専門家登録