Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1214 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【75642】エクセルを別窓で開いて表示 こたろう 14/6/4(水) 10:52 質問[未読]
【75643】Re:エクセルを別窓で開いて表示 Yuki 14/6/4(水) 16:46 発言[未読]
【75644】Re:エクセルを別窓で開いて表示 こたろう 14/6/4(水) 17:07 お礼[未読]
【75642】エクセルを別窓で開いて表示
質問  こたろう  - 14/6/4(水) 10:52 -
引用なし
パスワード
   同じフォルダ内にabc.xlsm，def.xlsm
ファイルがあり
abc.xlsmから
違うエクセルを開いて
そこで
def.xlsm
を操作したいのですが

基本的に新しくエクセルを開く方法を教えてください
簡単なことで済みませんが・・・
【75643】Re:エクセルを別窓で開いて表示
発言  Yuki  - 14/6/4(水) 16:46 -
引用なし
パスワード
   ▼こたろう さん：
Option Explicit

Public xlApp　　As Excel.Application
Public xlBook　 As Excel.Workbook

Sub BookOpen()
　　Set xlApp = New Excel.Application
　　xlApp.Visible = True
　　Set xlBook = xlApp.Workbooks.Open("開くエクセルファイルのフルパス")
　　
　　' xlBook が新規エクセルで開いていますのでこの Object変数で操作してください。
　　' Module Level で定義してありますからこのブックの何処でも参照出来ます。
End Sub
【75644】Re:エクセルを別窓で開いて表示
お礼  こたろう  - 14/6/4(水) 17:07 -
引用なし
パスワード
   ▼Yuki さん

ありがとうございました
動作することを確認しました

もう一度勉強します
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1214 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free