- ベストアンサー
Excel VBA
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
Call CreateObject("WSCript.Shell").Run("C:\aaa.vbs") もしくはAPI関数のShellExecute http://okweb.jp/kotaeru.php3?q=1545851
関連するQ&A
- VBSとエクセルVBAの連携
一定の処理を自動化したいと考えております 以下が現在の構成 main.vbs メインの処理を実行 Master.xls (Macro1) マクロを記述してあるエクセル A.xls マクロを実行したいエクセル 現状はmain.vbsの処理を終了後に手動でアクティブウィンドウをA.xlsにしてMacro1を実行しています。 （エクセルファイルは両方開きっぱなしです） これをmain.vbsの処理の中に組み込み main.vbsの処理終了後に自動的に実行するようにしたいと考えています。 1.既に開いてあるエクセルファイルをアクティブにする処理が分かりません。 2.アクティブなエクセルファイルから別のエクセルファイルのマクロを実行する方法がわかりません。 初心者の質問で理解に苦しむかと思われますがご教授よろしくお願いいたします。
- 締切済み
- その他（プログラミング・開発）
- EXCEL VBA SaveAsメソッドについて
お世話になります。 現在、ネットワーク内の２サーバー間でvbsを使用してExcelピボットを更新して別名で保存する処理 を作成しています。この時、Server１からExcelマクロ実行用のvbsをキックしてServer2のExcel マクロ内のSaveAsメソッドを実行してExcelを別名で保存すると、 作成されるべきファイルと拡張子無しの16進数のようなファイル名のファイルが2つ出来上がってしまいます。 Excelのバージョンは2003でServer2のExcelマクロを手動で実行した場合はこのようなことは発生しませんでした。 どなたか原因がわかる方がいればご教示いただきたく存じます。 何卒よろしくお願いいたします。
- ベストアンサー
- Visual Basic
- VBSでエクセルマクロの実行中
VBSでエクセルを起動しマクロを実行ここまでは上手くいったのですが マクロはファイルを開いたエクセルにペーストするものですが ファイルを移すときにこのファイルで良いですかと聞いてきます いつもENTで実行しているのですが ENT key を押すか 開く(o)をクリックこれをVBSに組み入れたいのですが 出来るでしょうか？
- 締切済み
- その他（プログラミング・開発）
- VBA フォルダ内の複数Excelファイルを開く
お世話になります。 XP エクセル2003使用です。 フォルダー内にある複数のすべてのエクセルを開くコードを 下記の解答をそのままコピーして実行しました。 （以下、このエクセルファイルを「実行ファイル.xls」と呼びます） http://okwave.jp/qa/q2598781.html (コードは最後尾に転記（※）） 問題点は、実行ファイル.xlsから実行した 開きたいエクセルファイルは、 Workbook_Open()で自動実行して、 最後に、ThisWorkbook.Closeで閉じるので、 マクロの実行がループの途中（1回目）で 実行ファイル.xls のコードの実行も終了してしますことです。 （実行ファイル.xls のファイルは開いたままです） つまり、ThisWorkbook.Closeでエクセルを閉じたときに マクロの実行までもが終わってしまうので、 実行ファイル.xlsに戻ってきません。 この問題を解決するための方法として 下記2点を調べましたが、力不足で自己解決できません。 --------------------- １ 実行ファイル.xls から開きたいエクセルファイルを開く時に 何かしらの命令文または引数を記述しておく。 → 解決のヒントを見つけることができませんでした。 --------------------- ２ 実行ファイルをエクセルではなく、VBS（VBScript）で記述する。 この場合、参考にしたコードを、 VBS用に書き換えれば良いと思いますが、 VBSは記述したことがないので、さっぱりです。 方法として間違っていなければ、 できれば、どなた様か当該コードを VBS用で記述いただけませんでしょうか？ --------------------- 一番良い方法が分からないので、 お力添えいただきたいのです。 よろしくお願いします。 --------------------- （※）参考コード --------------------- Sub OpenAllBooks() Dim FileName As String Dim OpenedBook As Workbook Dim IsBookOpen As Boolean FileName = Dir("*.xls") Do While FileName <> "" If FileName <> ThisWorkbook.Name Then IsBookOpen = False For Each OpenedBook In Workbooks If OpenedBook.Name = FileName Then IsBookOpen = True Exit For End If Next If IsBookOpen = False Then Workbooks.Open (FileName) ←この処理の後に戻ってこれません End If End If FileName = Dir() Loop End Sub
- ベストアンサー
- Excel（エクセル）
- エクセルVBA
こんばんは！ エクセルマクロ初心者です。 エクセルＶＢＡについて教えてください！ パス（？）を指定して、ファイルを開けてから実行する マクロを書きたいのですが、エラーになってしまいます。 Dim Filename as string (1)Workbooks.Open Filename:= "\D\MyDocument\●●.xls" (●●はファイル名) (2)Workbooks("●●").Activate (1)の部分は実行されて目的のファイルは開くのですが(2)でエラーになってしまいます。 どなたか教えてください！ 以前までは、このマクロ実行できていたのですが、突然できなくなりました。 困ってます。
- ベストアンサー
- Visual Basic
- EXCEL VBA プログラミング
EXCEL VBAについて教えて下さい。 プログラミング超初心者です。 book1でマクロを実行し、ダイアログボックスを表示させて、任意のファイル（book2）を開き、book1のsheet1をまるごとbook 2の末尾にコピーするという処理をしたいのですが、うまくマクロが組めません。 ダイアログボックス表示→ファイルの選択まではいけたのですが、その先で苦戦しています。。 ご存知の方、マクロの組み方をご教示いただけますでしょうか。 よろしくお願い致します。
- ベストアンサー
- Visual Basic
- エクセルのVBAについて
エクセルのVBAについて教えて下さい。 エクセルのVBAでプログラムを組んでいるのですが、一つわからないことがあるのです。 マクロが実行(オープン)されるファイル名（ファイルパス）をVBAで取得するためにはどうすればいいでしょうか？ たとえば、マクロが実行されるファイルがC:\テスト.xlsならば "C:\テスト.xls"を取得したいと考えています。 どなたかご教授お願い致します。 宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- エクセルマクロで質問ですが、どなたか教えてください。
エクセルマクロで質問ですが、どなたか教えてください。 処理の為のファイルとエクセルのマクロしか入っていないファイルの２種類を作って作業しています。 ですが、処理ファイルから、マクロファイルを読み込みマクロ実行させているのが、通常なのです。 しかし、時々マクロファイルが表（アクティブ）になってしまい、肝心の処理ファイルがアクティブになってなく、処理が出来ないときがあります。処理ファイルは名称がいろいろ変わる為、（見積A物件、B物件など）ファイル指定も出来ないのです。 マクロファイルを読み込み、実行させる際、マクロファイルを表に出さないで処理する方法があれば教えてください。
- ベストアンサー
- その他MS Office製品
- VBAで書いたファイルはひとつじゃないの？
VBSならtest.vbsの形で実行ファイルになるじゃないですか？ VBAでは何て拡張子にすればダブルクリックして実行できますか？ 教えてくださいよろしくお願いします。
- ベストアンサー
- Visual Basic
- EXCEL VBA で使用中のバージョンを検知できるか。
Ａというマクロファイルがあるとします。 このファイルを実行するのは一人ではなく、バージョンがまちまちです。 バージョンの違いにより、細かな不具合が発生してしまう恐れがある場合、マクロ内で使用中のバージョンを検知し、各バージョンに合わせた処理を行うことは可能でしょうか？ よろしくお願いいたします m(= =)mヾ
- ベストアンサー
- オフィス系ソフト
