Excel VBA質問箱 IV

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

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


41371 / 76732 ←次へ | 前へ→

【40441】Re:ブラウザでエクセルを実行したときの...
回答  ハチ  - 06/7/13(木) 19:13 -

引用なし
パスワード
   ▼けい さん:
書き込みの「種別」は"回答"以外でお願いします。

で、本題ですが・・・
自分の実力ではこのあたりで限界です。
別Bookを用意して、Excelアプリを別Windowに起動する方法を書いてみます。
これだと保存はせずに済みますが、「ブラウザ上で」との要件が満たせなくなります・・

新規ブックを作成して下記マクロを入れて
ブラウザから表示してみてください。
別アプリケーションで、結果のExcelのみが保存されない状態で残ります。
test_macro.xlsのキックするマクロ名はAuto_Open以外に変更したほうが良いです。
オートメーションエラーが発生するので、On Error Resume Nextしてます。

Option Explicit

Sub Auto_Open()

Dim xlApp As Object
Set xlApp = CreateObject("Excel.Application")

On Error Resume Next
With xlApp
  .Visible = True
  AppActivate xlApp
  .Workbooks.Open Filename:=ThisWorkbook.Path & "\test_macro.xls"
  .Application.Run "test_macro.xls!Auto_Open"
End With
On Error GoTo 0

Set xlApp = Nothing

End Sub

1 hits

【40402】ブラウザでエクセルを実行したときの閉じ... けい 06/7/13(木) 11:40 質問
【40414】Re:ブラウザでエクセルを実行したときの... ハチ 06/7/13(木) 13:57 発言
【40415】Re:ブラウザでエクセルを実行したときの... けい 06/7/13(木) 15:01 回答
【40429】Re:ブラウザでエクセルを実行したときの... ハチ 06/7/13(木) 16:09 回答
【40433】Re:ブラウザでエクセルを実行したときの... けい 06/7/13(木) 17:06 回答
【40441】Re:ブラウザでエクセルを実行したときの... ハチ 06/7/13(木) 19:13 回答
【40452】Re:ブラウザでエクセルを実行したときの... ハチ 06/7/14(金) 0:56 発言

41371 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free