質問編集履歴
1
コードと内容を追記しました。
title
CHANGED
|
@@ -1,1 +1,1 @@
|
|
|
1
|
-
|
|
1
|
+
オートメーションエラーについて
|
body
CHANGED
|
@@ -49,9 +49,43 @@
|
|
|
49
49
|
中々気持ち悪い流れなのでなくしたいです。
|
|
50
50
|
ご回答の程宜しくお願いいします。
|
|
51
51
|
|
|
52
|
+
追記
|
|
53
|
+
コードについてですが例えば
|
|
52
54
|
|
|
53
|
-
### 発生している問題・エラーメッセージ
|
|
54
55
|
|
|
56
|
+
```VBA
|
|
57
|
+
|
|
58
|
+
'--------------------------
|
|
59
|
+
' フォーム内のボタンAクリックイベント
|
|
60
|
+
'--------------------------
|
|
61
|
+
Private Sub btnA_Click()
|
|
62
|
+
|
|
63
|
+
' 自フォームを隠す
|
|
64
|
+
Call Me.Hide ← デバッグするとここで止まっている
|
|
65
|
+
|
|
66
|
+
' Bを表示
|
|
67
|
+
Call frmB.Show(vbModeless)
|
|
68
|
+
|
|
69
|
+
End Sub
|
|
55
70
|
```
|
|
71
|
+
|
|
72
|
+
上記のような非常に単純なコードでも発生します。
|
|
73
|
+
コードに問題があるのかないのかというよりも
|
|
74
|
+
状況や、やっていることにそもそも問題があるのか、ないのか。
|
|
75
|
+
VBAでやるべきことではないのかなどをお聞きしたいと思っています。
|
|
76
|
+
|
|
77
|
+
・ブック１ではオープン処理でフォームAが開き、
|
|
78
|
+
フォームA内でボタンを押すと、フォームBに遷移し、フォームBにはフォームC,D,E,Fへ遷移するボタンがあります。
|
|
79
|
+
|
|
80
|
+
・ブック２ではオープン処理でフォームGが開きます。
|
|
81
|
+
|
|
82
|
+
・ブック３ではオープン処理でフォームHが開きます。
|
|
83
|
+
|
|
84
|
+
各ブックで開かれるフォームはそれぞれのブックのプロジェクトに所属しています。
|
|
85
|
+
|
|
86
|
+
今回はブック1のフォーム達を遷移しまくった後、閉じていくと上記のコードの場所でエラーが発生しました。
|
|
87
|
+
|
|
88
|
+
### 発生している問題・エラーメッセージ
|
|
89
|
+
```
|
|
56
90
|
「オートメーションエラーです。」
|
|
57
91
|
```
|