締切済み

PowerPointからExcelのマクロを実行

2015/04/24 18:19

PowerPointのマクロを利用して、Excelを開く事はできたのですが、Excelのauto_openは実行されません。 ExcelであればApplication.Run "****.xls!macro"で呼び出す事ができるのですが、それに相当する事をPowerPointのマクロからやりたいのです。ご教示いただければ幸いです。

yama_x
お礼率35% (308/875)

オフィス系ソフト
回答数1
ありがとう数0

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

みんなの回答

NotFound404
ベストアンサー率70% (288/408)

2015/04/24 23:40 回答No.1

どうやって開いていますか？ Auto_Open はオートメーションで開いた場合は実行されませんので ThisWorkbook の Private Sub Workbook_Open() にコード内容を移動する必要があります。 Shell で開けば Auto_Open でも実行されますが、その後の制御方法は不明です。

関連するQ&A

xltから開いたファイルのマクロを実行したい

"a.xls"のマクロから"b.xlt"のファイルを開くと"b1"（拡張子無し）のファイルが開きますよね。 "b.xlt"にはauto_openのマクロが入っているのですが、この開き方では、 auto_openが実行されません。そこで　"Application.Run "b!auto_open" としてみても "Application.Run "b.xls!auto_open"としてみても、auto_openは実行されません。一度保存しないと、xltから開いたファイルのマクロを走らせる事は不可能でしょうか？
VBからマクロの実行について

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

似たような質問があったのですが、解決できませんでしたので質問させて頂きます。下記のプログラムで、ASPでExcelを起動後、マクロを実行させてたいと考えています。 Set objEx = Server.CreateObject(Excel.Application) objEx.Application.Visible = True objEx.Workbooks.Open "C:\Excel\hoge.xls" objEx.Run("hoge.xls!Module1.macro1()") しかし、excelがバックグラウンドで実行されて表示されないので困っています。表示させる方法はあるのでしょうか？アドバイスお願い致します。
どのファイルを開いた時もマクロを自動実行。エクセル

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

最近UWSCというソフトを使うようになりました。で、エクセルからSHELLをつかってUWSCを立ち上げ実行し、UWSCの最後に再度エクセルの指定したマクロを実行したいと思っています。エクセルファイル名= AAA.xls Excel = GETACTIVEOLEOBJ("Excel.Application" ,エクセルファイル名) ---- 中略 ---- Excel.Visible = True ACW(GETID("MICROSOFT EXCEL - " + エクセルファイル名　,"XLMAIN"),-4,-4,1288,1002,0) CTRLWIN(GETID("MICROSOFT EXCEL"), MAX) msgbox("完了しました。") Excel.Application.Run エクセルファイル名 & "!Macro1" といったようなスクリプトを組んだのですが、なにもないままUWSCが終了してしまいます。 UWSCから指定のエクセルマクロを実行する方法を教えてください。
アクティブなブックのマクロの実行について

現在使用しているエクセルのブックがあり、ブック名はA(Ver1.0)とします。このブックにApplication.Run "'A（Ver1.0）.xls'!(1)"…Application.Run "'A（Ver1.0）.xls'!(20)"というマクロがあります。ブック名をマクロ実行前に必ず変更しなければならなくて、そのブック名は毎回違ったものになります。わざわざブック名を変更せずに、現在開いているブックのマクロを実行するという風にしたいのですがどうしたらいいですか？よろしくお願いします。
ExcelのマクロをWSHから実行させると「型が一致しません」のエラーがでます。

WSHからExcel2000のマクロを実行させています。このマクロはセルの計算式の結果(セル(1,2))をif関数で比較するコードが入っています。 If Cells(1, 2).Value = "8月" Then hensu = 1 End If これをWSHから実行させると「型が一致しません」とエラーが出ます。 Debug.Print TypeName(Cells(1,2).Value)で型を表示させてみるとマクロを直接実行させたときはStringですが、WSHから実行させるとErrorとなっています。なぜWSHから実行すると型がErrorとなるのかということと、解決策を教えていただければ幸いです。ちなみにWSHでマクロを実行させている部分は以下のとおりです。 Set objExcelApp = CreateObject("Excel.Application") Set objWbk = objExcelApp.Workbooks.Open("ExcelBook.xls",True) objExcelApp.Run("ExcelBook.xls!macro1")
エクセルマクロで教えてください。

先日、皆様から質問の内容がわからないとのお叱りを受けた者です。しばらく出張で不在にしており、昨日出社し皆様からのお叱りに対しもっともであり、質問の内容をうまく伝えられなかった事を反省しております。申し訳ありません。以下に書いた内容ではいかがでしょうか？アクティブにしないで、ファイルをオープンさせたいのです。内容：ＫＹＡＫＵ＿Ａ．ＸＬＳを始にオープンします。そのＫＹＡＫＵ＿Ａ．ＸＬＳには、マクロで、ＭＡＳＴ．ＸＬＳをＡＵＴＯＯＰＥＮのみのマクロを入れております。そのオープンの内容は次のとおりです。 Workbooks.Open Filename:="C:\Documents and Settings\owner\My Documents\見積書\マクロ.xls" Application.Run "マクロ.xls!流れ" を行い、マクロのみの記載されたＸＬＳを走らせます。ＫＹＡＫＵ＿Ａ．ＸＬＳのほかに＿Ｂや＿Ｃなど数多くのＸＬＳから、同じＭＡＳＴ．ＸＬＳとマクロ．ＸＬＳを走らせたいのです。その際に教えていただきたいのは、ＭＡＳＴ．ＸＬＳとマクロ．ＸＬＳは上記の方法ですとアクティブになってしまいます。画面上では、操作の関係から、ＫＹＡＫＵ＿Ａ．ＸＬＳ等の客先内容のみをアクティブにしておきたいし印刷もその客先内容を行うマクロにしたいのですが、ＭＡＳＴ．ＸＬＳとマクロ．ＸＬＳをアクティブにしなければ可能ではないかと思いますが、どなたかどうすれば良いかまた、そのマクロはどのように記載すれば良いかを教えていただきたくお願いします。
VBからPowerPointのマクロを実行する方法

代記の通りなのですが、VBを利用して、PowerPointのマクロを実行したいのですが、開くところは分かるのですが、実行する記述が分かりません。どなたかヒントになることを教えていただけないでしょうか? また、マクロの内容なのですが、EXCELで作ったサンプルデータの内容のグラフを表示したいのですが、マクロ機能を使ってデータのインポートを行ったところ、インポート部分のマクロのみ記述されませんでした。こちらの方もどなかたヒントになることをご存知の方がおりましたアドバイスをいただけると幸いです。よろしくお願いします。環境:WIN_XP VB6 POWERPOINT 2000
エクセルマクロでマクロをアクティブにしたくない

エクセルのマクロをひとつの「マクロA」という名前で、データーファイルからセルに入っている内容などを呼び出しながらまくろAのシートにデーターを貼り付けながら作業をしています。 Workbooks.Open Filename:= _ "C:\Documents and Settings\owner\My Documents\マクロ.xls" Application.Run "マクロ.xls!マクロ" と記載すると、マクロXLSがアクティブになってしまいます。その為記載に'ActiveWindow.WindowState = xlMinimized と入れたりするのですが、アクティブになるシートがマクロ以外にうまくいかないことがあるのです。データーシートは、毎回データーが変わる関係で、DATA．ｘｌｓがAのときやBのときが発生します。
マクロ実行後エクセルを閉じたい

２つの別々のファイルを開いて片方からもう片方にコピーして保存して終了する。（両方とも閉じる）というマクロを作ったのですがコピー終了後に実行したマクロ付きのエクセルも閉じてデスクトップ上には何も開いていない状態にしたいのですがworkbookのところに下記の命令を記述してもうまくいきません。 Application.Run "ＸＸＸＸＸＸ" ThisWorkbook.Save ThisWorkbook.Saved = True If Workbooks.Count <= 1 Then Application.Quit ThisWorkbook.Close False マクロ付きのエクセルも一旦は閉じるのですがその後に別の白紙のブックが開いてしまうのです。続けて他のマクロをスケジュールで実行したいのですが実行時に「既にエクセルが開いています」みたいな警告が表示され実行できません。エクセルを完全に閉じるようにするにはどうしたらいいのでしょうか？
vbsで、フォルダ内にあるcsvファイル全てを開き、マクロを起動させた

vbsで、フォルダ内にあるcsvファイル全てを開き、マクロを起動させたい。こんにちは。お世話になっております。さて、最初はバッチでどうにかならないかと思っていましたが、下記vbsソースを見つけ、早速チャレンジしたのですが、ファイルが開くところまではうまく行きますが、「マクロ Macro1がありません」というメッセージが出てしまい、マクロが実行されません。手動でマクロを実行しようとするときに出てくるマクロ一覧には、PERSONAL.XLS：Macro1と、表示されております。マクロの保存先をまちがえているのでしょうか？また、あるフォルダのcsvファイル全てに対して１つのvbsキックで処理が行なわれるようにするには、どの様にすればいいでしょうか？よろしくお願いします。 ----------------------------------------------------------------------- Dim obj Set obj = WScript.CreateObject("Excel.Application") obj.Visible = True obj.Workbooks.Open "C:\Documents and Settings\Administrator\My Documents\001.xls" obj.Application.Run "Macro1"
Windowsのタスク機能からExcelを開きマクロを実行しようと思っても、Excelがアクティブにならず、マクロが実行されない。

仕事で、指定の時間にExcelで作ったマクロを実行し、帳票を作らなくてはなりません。 PCの前にいない時間に、自動的に実行される必要があります。マクロはExcelを開くと同時に実行されるよう、「Auto_Open」を使いました。あとは自動にこのExcelが開けばいいので、こちらで検索したところ、タスク機能を使うとExcelを指定の時間に開くことができると知り、試してみました。 http://oshiete1.goo.ne.jp/qa4146028.html しかし、Excelは開くのですが、アクティブの状態にはならず、マクロが実行されません。タスク機能ではExcelを開いてマクロを実行することはできないのでしょうか？タスク機能は、ウィザードに従って設定してます。プロパティからは特に設定していません。どなたか教えてください。宜しくお願いします。
エクセル　マクロで自動実行と終了について

エクセルで作ったマクロを自動実行・自動保存・自動終了したいので、下記のような記述のマクロをつくり、Windowsのタスク処理で1回/日実行させようとしています。 ----<ここから>------------------------------------ Sub Auto_Open() 　　 : 　　: 　　Workbooks("ekuseru.xls").Close SaveChanges:=True End Sub ----<ここまで>------------------------------------ 質問その１　マクロを編集したい場合はどうすればいいのでしょう？　そのBookを開くとマクロが動き出し、保存した上で終了してしまいます。　マクロ無効でBookを開くと「ツール」⇒「マクロ」⇒「マクロ」で「編集」はクリッ　クできないようになってます。質問その２　マクロが終了するとき、Bookは閉じますがエクセル自体は閉じません。　（意味通じますか？）　エクセル自体を閉じるにはマクロの記述はどうすればいいのでしょう？以上、よろしくお願いします。
Excel マクロ実行で急に砂時計マークで固まってしまいます。

Excel マクロ実行で急に砂時計マークで固まってしまいます。 ●昨日までは問題なく動作してましたが、　「下記マクロ実行」で「 ★部分」で急に砂時計マークで固まってしまいます。 Windows XP　Home Edition SP3 Office XP Personal 2002 Excel 2002 ＰＣのＣドライブに対してでしたら、全く問題なく動作しますが、外付けHD （ BUFFALO HD-HU2 ）に対してだけ●となってしまします。 E123.xls にマクロでなにも編集を加えない場合は、きちんと動作しますが、 E123.xls にマクロで編集した直後に実行しますと、必ず●となります。マクロでなく、簡単な手作業で編集を加えた場合は、きちんと動作します。どのようにすれば、問題なく動作するようになりますでしょうか？何卒、ご教示のほどをお願い致します。 '------------------------- Sub 変更せず閉じて開く_外付けHD() Application.ScreenUpdating = False Application.CutCopyMode = False 'コピモードを非表示にしておく Application.DisplayAlerts = False '確認メッセージを非表示にする Windows("E123.xls").Close Application.DisplayAlerts = True Workbooks.Open Filename:= _ "G:\A-HD-HU\Ex\あいう\2009\09\E123.xls"　'←★ここで固まってしまいます Windows.Arrange ArrangeStyle:=xlCascade Application.ScreenUpdating = True End Sub
エクセルからワードのマクロを実行したい

1. ワードで作られた報告書の表の数値をエクセルにコピーし、 2. その数値を使ってエクセルのオートシェイプでグラフを描き、 3. グラフをもう一度ワードの所定の位置に図として貼りつける、というマクロを作成しています。ワードの表をコピーするマクロと、エクセルでグラフを描くマクロは作成できました。問題はエクセルのシートに配置したコマンドボタンをクリックすると、グラフの入ったセル範囲をコピーするまではできたのですが、その後にワードのマクロを指定して実行させる方法がわかりません。 1.→2.のエクセルのマクロを実行する方はauto_openで何とかなったのですが、2.→3.は既にワード文書は開かれていますし、auto_openでは1.の手順ができなくなってしまうので困っています。もし、エクセルのマクロでワードを操作などできるのでしたらそれでもよいのですが…。ワードのマクロは初挑戦で、色々サイトも探したのですが見つかりませんでした…。使用していますのは、Windows98SE,Excel97,Word97です。ご存知の方、どうぞよろしくお願い致します。
■　エクセルマクロについてです。初級？

エクセルのマクロでデスクトップにあるエクセルファイルを開くにはどうしたらいいのでしょうか？現在は、エクセルファイルＡ.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
エクセル　タスクスケジューラでマクロ自動実行

お世話になります。 win7／エクセル２０１０使用です。エクセルのThisWorkbook_openでマクロを実行するファイルＡを作っています。 ※Auto_Openは記述していません。ファイルＡをタスクスケジューラに設定いたしました。問題なくマクロが自動実行されて、目的は果たしています。ただ、不思議な点があります。このファイルＡをダブルクリックして開いてもマクロは自動実行されていきます。このファイルＡをコピーして、ファイルＢを作りそれをダブルクリックで開くと、ファイルＢは、ブックが開いた後に、「セキュリティーの警告」がされてマクロの自動実行ができません。通常は、「セキュリティーの警告」を出さないために Auto_Openなどでコードを記述すると思うのですが、なぜ、Auto_Openを記述していないファイルＡが自動実行されるのかがわかりません。タスクスケジューラの設定に何か関係はあるのでしょうか？よろしくお願いします。
VBでエクセルのバージョンを指定して開く

PCにEXCEL2002と2013がインストールされています。 VBでエクセルを起動し、マクロを実行したいのですが、その際に起動するエクセルのバージョンを指定したいと考えています。以下でやると標準設定のEXCELが開いてしまい、バージョンの指定ができません。 Dim xlApp As New Excel.Application() Dim xlBooks As Excel.Workbooks xlBooks = xlApp.Workbooks xlBooks.Open("C:\test.xls") xlApp.Visible = True xlApp.Run("test.xls!macro") なにか方法はありますでしょうか？
EXCELのマクロ実行時の確認表示

ＳＬＫ形式をＸＬＳ形式にして自動保存するマクロを作りました。このマクロをAUTO_OPENなどで実行させると「同じファイルが有ります・・」とかなんとかで上書きするか確認画面で出てしまいます。いちいちＯＫ押すのも面倒です。このメッセージをでないようにするか無視して自動上書きできないでしょうか？

PowerPointからExcelのマクロを実行

みんなの回答

関連するQ&A

xltから開いたファイルのマクロを実行したい

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

ASPでExcel起動後マクロ実行

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

UWSCからエクセルのマクロを実行

アクティブなブックのマクロの実行について

ExcelのマクロをWSHから実行させると「型が一致しません」のエラーがでます。

エクセルマクロで教えてください。

VBからPowerPointのマクロを実行する方法

エクセルマクロでマクロをアクティブにしたくない

マクロ実行後エクセルを閉じたい

vbsで、フォルダ内にあるcsvファイル全てを開き、マクロを起動させた

Windowsのタスク機能からExcelを開きマクロを実行しようと思っても、Excelがアクティブにならず、マクロが実行されない。

エクセル　マクロで自動実行と終了について

Excel マクロ実行で急に砂時計マークで固まってしまいます。

エクセルからワードのマクロを実行したい

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

エクセル　タスクスケジューラでマクロ自動実行

VBでエクセルのバージョンを指定して開く

EXCELのマクロ実行時の確認表示

注目のQ&A

カテゴリ
一覧

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

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

PowerPointからExcelのマクロを実行

みんなの回答

関連するQ&A

xltから開いたファイルのマクロを実行したい

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

ASPでExcel起動後マクロ実行

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

UWSCからエクセルのマクロを実行

アクティブなブックのマクロの実行について

ExcelのマクロをWSHから実行させると「型が一致しません」のエラーがでます。

エクセルマクロで教えてください。

VBからPowerPointのマクロを実行する方法

エクセルマクロでマクロをアクティブにしたくない

マクロ実行後エクセルを閉じたい

vbsで、フォルダ内にあるcsvファイル全てを開き、マクロを起動させた

Windowsのタスク機能からExcelを開きマクロを実行しようと思っても、Excelがアクティブにならず、マクロが実行されない。

エクセル マクロで自動実行と終了について

Excel マクロ実行で急に砂時計マークで固まってしまいます。

エクセルからワードのマクロを実行したい

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

エクセル タスクスケジューラでマクロ自動実行

VBでエクセルのバージョンを指定して開く

EXCELのマクロ実行時の確認表示

注目のQ&A

カテゴリ 一覧

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

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

エクセル　マクロで自動実行と終了について

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

エクセル　タスクスケジューラでマクロ自動実行

カテゴリ
一覧

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