過去ログ

                                Page     875
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼関連ファイルを開く  nori 03/3/15(土) 19:03
   ┗Re:関連ファイルを開く  ぴかる 03/3/15(土) 21:09
      ┗Re:関連ファイルを開く  nori 03/3/15(土) 21:58

 ───────────────────────────────────────
 ■題名 : 関連ファイルを開く
 ■名前 : nori <miyagawa2103@ybb.ne.jp>
 ■日付 : 03/3/15(土) 19:03
 -------------------------------------------------------------------------
   教えてください。

始めるとき
BOOK1を開いたら
BOOK2も自動的に開く。

終了するとき

BOOK1を閉じたら
BOOK2も閉じる。

  よろしくお願いいたします。
 ───────────────────────────────────────  ■題名 : Re:関連ファイルを開く  ■名前 : ぴかる  ■日付 : 03/3/15(土) 21:09  -------------------------------------------------------------------------
   noriさん、こんばんは。

Book1の標準モジュールに以下のマクロを貼り付けて実行してみて下さい。

Sub AUTO_OPEN()

  Workbooks.Open Filename:="C:\My Documents\Book2.xls"

End Sub
Sub AUTO_CLOSE()

  Windows("Book2.xls").Activate
  ActiveWindow.Close

End Sub
 ───────────────────────────────────────  ■題名 : Re:関連ファイルを開く  ■名前 : nori <miyagawa2103@ybb.ne.jp>  ■日付 : 03/3/15(土) 21:58  -------------------------------------------------------------------------
   ぴかる さん
こんばんわ。
ありがとうございました。
早速試しました。

思った通りに、うまくいきました。

ありがとうございました。

▼ぴかる さん:
>noriさん、こんばんは。
>
>Book1の標準モジュールに以下のマクロを貼り付けて実行してみて下さい。
>
>Sub AUTO_OPEN()
>
>  Workbooks.Open Filename:="C:\My Documents\Book2.xls"
>
>End Sub
>Sub AUTO_CLOSE()
>
>  Windows("Book2.xls").Activate
>  ActiveWindow.Close
>
>End Sub
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 875