質問編集履歴

1

コードと内容を追記しました。

2018/05/12 15:36

投稿

julia1993
julia1993

score8

test CHANGED
@@ -1 +1 @@
1
- Excel VBA オートメーションエラーについて
1
+ オートメーションエラーについて
test CHANGED
@@ -100,11 +100,79 @@
100
100
 
101
101
 
102
102
 
103
+ 追記
104
+
105
+ コードについてですが例えば
106
+
107
+
108
+
109
+
110
+
111
+ ```VBA
112
+
113
+
114
+
115
+ '--------------------------
116
+
117
+ ' フォーム内のボタンAクリックイベント
118
+
119
+ '--------------------------
120
+
121
+ Private Sub btnA_Click()
122
+
123
+
124
+
125
+ ' 自フォームを隠す
126
+
127
+ Call Me.Hide ← デバッグするとここで止まっている
128
+
129
+
130
+
131
+ ' Bを表示
132
+
133
+ Call frmB.Show(vbModeless)
134
+
135
+
136
+
137
+ End Sub
138
+
139
+ ```
140
+
141
+
142
+
143
+ 上記のような非常に単純なコードでも発生します。
144
+
145
+ コードに問題があるのかないのかというよりも
146
+
147
+ 状況や、やっていることにそもそも問題があるのか、ないのか。
148
+
149
+ VBAでやるべきことではないのかなどをお聞きしたいと思っています。
150
+
151
+
152
+
153
+ ・ブック1ではオープン処理でフォームAが開き、
154
+
155
+  フォームA内でボタンを押すと、フォームBに遷移し、フォームBにはフォームC,D,E,Fへ遷移するボタンがあります。
156
+
157
+
158
+
159
+ ・ブック2ではオープン処理でフォームGが開きます。
160
+
161
+
162
+
163
+ ・ブック3ではオープン処理でフォームHが開きます。
164
+
165
+
166
+
167
+ 各ブックで開かれるフォームはそれぞれのブックのプロジェクトに所属しています。
168
+
169
+
170
+
171
+ 今回はブック1のフォーム達を遷移しまくった後、閉じていくと上記のコードの場所でエラーが発生しました。
172
+
103
173
 
104
174
 
105
175
  ### 発生している問題・エラーメッセージ
106
-
107
-
108
176
 
109
177
  ```
110
178