質問編集履歴
5
誤字と文言の修正
title
CHANGED
File without changes
|
body
CHANGED
@@ -114,7 +114,7 @@
|
|
114
114
|
### 試したこと
|
115
115
|
①test_main.xlsmの変数exAppの型をObject型に変更し、事前バインディングから実行時バインディングになるようにしてみた。
|
116
116
|
⇒変化なし。
|
117
|
-
②test.xlsm起動時にtest_main.xlsm用のExcelObjectを生成する前にあらかじめダミーのマクロで
|
117
|
+
②test.xlsm起動時にtest_main.xlsm用のExcelObjectを生成する前にあらかじめダミーのマクロでExcelObjectを生成する。
|
118
118
|
ダミーの内容はWorkbook_Openイベント内で「Windows(ThisWorkbook.Name).Visible = False」のみ。
|
119
|
-
⇒test_main.xlsmとは別プロセスになり、後から開いたブック
|
119
|
+
⇒test_main.xlsmとは別プロセスになり、後から開いたブックもダミーのプロセスに吸収されることを確認した。(先に開いたExcelプロセスが優先される?)
|
120
120
|
しかし、後から開いたブックを全て閉じればダミーのプロセスが消滅し、次回からブックを開いた際はtest_main.xlsmのプロセスが吸収してしまう。
|
4
試したことの追加
title
CHANGED
File without changes
|
body
CHANGED
@@ -112,5 +112,9 @@
|
|
112
112
|
よろしくお願いいたします。
|
113
113
|
|
114
114
|
### 試したこと
|
115
|
-
test_main.xlsmの変数exAppの型をObject型に変更し、事前バインディングから実行時バインディングになるようにしてみた。
|
115
|
+
①test_main.xlsmの変数exAppの型をObject型に変更し、事前バインディングから実行時バインディングになるようにしてみた。
|
116
|
-
⇒変化なし。
|
116
|
+
⇒変化なし。
|
117
|
+
②test.xlsm起動時にtest_main.xlsm用のExcelObjectを生成する前にあらかじめダミーのマクロでExcelObjextを生成する。
|
118
|
+
ダミーの内容はWorkbook_Openイベント内で「Windows(ThisWorkbook.Name).Visible = False」のみ。
|
119
|
+
⇒test_main.xlsmとは別プロセスになり、後から開いたブックのプロセスもダミーの方へ吸収されることを確認した。(先に開いたプロセスが優先される?)
|
120
|
+
しかし、後から開いたブックを全て閉じればダミーのプロセスが消滅し、次回からブックを開いた際はtest_main.xlsmのプロセスが吸収してしまう。
|
3
ソースコードの修正
title
CHANGED
File without changes
|
body
CHANGED
@@ -39,7 +39,7 @@
|
|
39
39
|
Dim exApp As Excel.Application
|
40
40
|
|
41
41
|
'ブックの非表示
|
42
|
-
Windows(
|
42
|
+
Windows(ThisWorkbook.Name).Visible = False
|
43
43
|
|
44
44
|
'別プロセスでフォーム用マクロを起動
|
45
45
|
Set exApp = CreateObject("Excel.Application")
|
@@ -65,7 +65,7 @@
|
|
65
65
|
Private Sub Workbook_Open()
|
66
66
|
|
67
67
|
'ブックの非表示
|
68
|
-
Windows(
|
68
|
+
Windows(ThisWorkbook.Name).Visible = False
|
69
69
|
'ユーザーフォームの表示
|
70
70
|
UserForm1.Show vbModeless
|
71
71
|
|
2
タイトルの修正
title
CHANGED
@@ -1,1 +1,1 @@
|
|
1
|
-
|
1
|
+
ExcelVBA ユーザーフォームを表示後に別ブックを表示し、表示したブックを全て閉じてもユーザーフォームは残るようにしたい
|
body
CHANGED
File without changes
|
1
概要の変更
title
CHANGED
File without changes
|
body
CHANGED
@@ -12,7 +12,7 @@
|
|
12
12
|
OS:Windows10 Home 64bit
|
13
13
|
Office(Excel):Professional Plus 2016 32bit
|
14
14
|
|
15
|
-
### 前提・
|
15
|
+
### 前提・要件
|
16
16
|
お世話になります。初質問のため、至らぬ点がございましたら
|
17
17
|
申し訳ございませんがご教示ください。
|
18
18
|
|