VBAで新規にエクセルのアプリケーションを起動し、
その中に既存のファイルを起動する方法は有りますか?
Sub Sample()
Dim appExcel As Excel.Application
Dim WSH As Variant
Dim strPath As String
Set appExcel = New Excel.Application
Set WSH = CreateObject("Wscript.Shell")
strPath = ActiveWorkbook.Path
With appExcel
.Visible = True
.Workbooks.Add
.ActiveWorkbook.SaveAs (strPath & "\ test.xls")
End With
Set WSH = Nothing
End Sub
このコードは、ネットから拾ったサンプルコードなのですが
新しいアプリケーションでエクセルを立ち上げることはできたのですが
新規のブックが開いてしまい、
更に、開きたいファイルに上書き保存してしまいそうです。
新規のブックが開く原因は
.Workbooks.Addで、
上書き保存する原因は
.ActiveWorkbook.SaveAs
だとわかってるのですが、
この部分を同変更すればいいのかがわかりません。
Workbooks.Open?Filename:="C:\Users\test.xlsx"
だと、現在実行しているvbaファイルを同じ枠内で
該当のファイルが開いてしまいます。
No.1ベストアンサー
- 回答日時:
こんにちは。
Excel.Application オブジェクトの 直下に .Workbooks コレクションがある訳ですから、
appExcel.Workbooks.Open Filename:=......
という風に指定すればいいことになります。
ご提示の記述では、WSHは使っていないようですから、省いたものでお応えします。
Sub Re8741206()
Dim appExcel As Excel.Application
Dim strPath As String
Set appExcel = New Excel.Application
strPath = "C:\Users" ' ActiveWorkbook.Path
With appExcel
.Visible = True
' ' 既存のブックを開く
.Workbooks.Open Filename:=strPath & "\test.xlsx" '"C:\Users\test.xlsx"
' ' 処理
' ' 処理が済んだら閉じる
' .Quit
End With
' ' 処理が済んだら解放
Set appExcel = Nothing
End Sub
No.2
- 回答日時:
.Workbooks.Add "C:\Users\test.xlsx"
とかでどうなりますか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) 【前回の続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/16 16:44
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Visual Basic(VBA) vbaのエラー対応(実行時エラー7:メモリが不足しています) 4 2023/04/24 00:20
- Visual Basic(VBA) マクロVBA 1シートをまとめる 閉じ方 初心者 SOS! 1 2022/06/17 14:54
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Visual Basic(VBA) Excel-VBAでのファイルの開き方 4 2023/02/14 11:01
- Visual Basic(VBA) VBAでファイルを開くプログラムがエラーです 2 2023/02/21 16:56
- Visual Basic(VBA) VBA This Workbookモジュールを別ファイルにコピーする方法 1 2022/09/14 01:51
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【マクロ】読取専用のファイル...
-
VBAでワークブックの名前を変数...
-
エクセルマクロで不特定なファ...
-
ファイルを開かずにマクロを実行
-
エクセルのシートの数を数えた...
-
VBA EXCELファイル選択⇒指定セ...
-
EXCEL VBA 指定したファイルが...
-
複数のexcelファイルを一つにす...
-
【Excel VBA】ファイル名が一...
-
vlookup関数の引数を変数で指定...
-
フォルダ内のブック全部にパス...
-
ISOファイルとMDSファイル
-
ccdファイルはどのようにして使...
-
差し込み印刷の元データファイ...
-
ACCESSでデータ読み取り専用を...
-
イーファンビューでwebpファイ...
-
非サポートファイルとは…???
-
OneDriveはどちらが「主」でし...
-
gccを行ってもexeファイルが生...
-
access テキストボックスの値取得
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCEL VBA 指定したファイルが...
-
エクセルマクロで不特定なファ...
-
VBAでワークブックの名前を変数...
-
フォルダ内のexcelファイルを順...
-
エクセルのxls形式からxlsx形式...
-
エクセル 複数ファイルの一括...
-
エクセルのシートの数を数えた...
-
accessフォルダを移動したらフ...
-
vlookup関数の引数を変数で指定...
-
Accessのaccdbファイルを起動で...
-
ファイルを開かずにマクロを実行
-
【Excel VBA】ファイル名が一...
-
EXCELマクロを無効にして開く方法
-
エクセル(マクロ)のファイル...
-
ACCESS VBAでファイルを開くダ...
-
Excel VBA でファイルが開かれ...
-
ファイルの保存場所を変えたら...
-
vba初心者です。 質問です。 毎...
-
フォルダ内のブック全部にパス...
-
エクセルマクロ 異なるファイ...
おすすめ情報