回答編集履歴
5
2021/05/05変更に対する追記
test
CHANGED
@@ -70,4 +70,60 @@
|
|
70
70
|
|
71
71
|
|
72
72
|
|
73
|
+
(2021/05/05の変更に対する追記)
|
74
|
+
|
75
|
+
1.現在提示のコードからは、提示のエラーメッセージは表示されません。
|
76
|
+
|
77
|
+
2.コードの改善案
|
78
|
+
|
79
|
+
(1)
|
80
|
+
|
81
|
+
渋谷.xlsmのコードは、標準モジュールに記載しているのでしょうか。
|
82
|
+
|
83
|
+
もし、標準モジュールに記載していないのであれば外部から今の形式で呼び出すことはできません。
|
84
|
+
|
85
|
+
標準モジュールを追加して、コードを記載するか、標準モジュールに記載しないのであれば
|
86
|
+
|
87
|
+
「Application.Run "'渋谷.xlsm'!Sheet1.test1"」というような記述に変更する必要があります。
|
88
|
+
|
89
|
+
|
90
|
+
|
91
|
+
(2)
|
92
|
+
|
93
|
+
```VBA
|
94
|
+
|
95
|
+
Sub test1()
|
96
|
+
|
97
|
+
Call test2
|
98
|
+
|
99
|
+
end sub
|
100
|
+
|
101
|
+
```であれば「渋谷.xlsm」に「test2」が定義されていないので、エラーとなります。
|
102
|
+
|
103
|
+
何をしたいのかわかりませんが、修正は必要です。
|
104
|
+
|
105
|
+
|
106
|
+
|
107
|
+
(3)
|
108
|
+
|
109
|
+
2-2_003z(run).xlsmと渋谷.xlsmが同一のフォルダにあるのであれば2-2_003z(run).xlsmの処理は以下に修正した方が良いです。同一フォルダの「渋谷.xlsm」という意味になります。
|
110
|
+
|
111
|
+
|
112
|
+
|
113
|
+
```VBA
|
114
|
+
|
115
|
+
Public Sub test2()
|
116
|
+
|
117
|
+
ChDrive ThisWorkbook.Path
|
118
|
+
|
119
|
+
ChDir ThisWorkbook.Path
|
120
|
+
|
121
|
+
Application.Run "'渋谷.xlsm'!test1"
|
122
|
+
|
123
|
+
End Sub
|
124
|
+
|
125
|
+
```
|
126
|
+
|
127
|
+
|
128
|
+
|
73
|
-
とりあえずは
|
129
|
+
とりあえず、今思いつくのはこんな所でしょうか。
|
4
確認方法の追記
test
CHANGED
@@ -27,3 +27,47 @@
|
|
27
27
|
|
28
28
|
|
29
29
|
色々確認してみてそれでも駄目であれば、それぞれの確認した結果を質問に追記すればよいかと思います。
|
30
|
+
|
31
|
+
|
32
|
+
|
33
|
+
(追記)
|
34
|
+
|
35
|
+
いろいろ確認方法を追記します。
|
36
|
+
|
37
|
+
(1)
|
38
|
+
|
39
|
+
Sub test2()
|
40
|
+
|
41
|
+
Debug.Print CurDir
|
42
|
+
|
43
|
+
Application.Run "渋谷.xlsm!test"
|
44
|
+
|
45
|
+
end sub
|
46
|
+
|
47
|
+
として実行したらイミディエイトウィンドウに、E:\と表示されるか。
|
48
|
+
|
49
|
+
|
50
|
+
|
51
|
+
(2)
|
52
|
+
|
53
|
+
渋谷.xlsmのみを開き、VBE(VBAのコードを書くところ)において
|
54
|
+
|
55
|
+
メニューの
|
56
|
+
|
57
|
+
デバッグ>VBA Projectのコンパイル
|
58
|
+
|
59
|
+
を実行してエラーとなる箇所がないか。
|
60
|
+
|
61
|
+
|
62
|
+
|
63
|
+
エラー箇所があれば、すべて解消する。
|
64
|
+
|
65
|
+
もし、解消方法が不明なものがあれば、質問に追記でもいいかと思います。
|
66
|
+
|
67
|
+
(まぁ、すべて解消しなくても実行は出来ますが、実行できない問題もあるので
|
68
|
+
|
69
|
+
ソースが見れない状態では、こういう確認方法になります)
|
70
|
+
|
71
|
+
|
72
|
+
|
73
|
+
とりあえずは、ここまで。
|
3
念のため追記。「標準モジュールに」という説明を追記
test
CHANGED
@@ -4,11 +4,11 @@
|
|
4
4
|
|
5
5
|
私の環境で、そのエラーメッセージが出るのは、以下のパターンがありました。
|
6
6
|
|
7
|
-
・渋谷.xlsmにtestという関数がない。
|
7
|
+
・渋谷.xlsmの標準モジュールにtestという関数がない。
|
8
8
|
|
9
9
|
・渋谷.xlsmのマクロが実行できない状態になっている。
|
10
10
|
|
11
|
-
例えばtestという関数が複数あるとか、構文エラーがどこかにあるとか
|
11
|
+
例えばtestという関数が標準モジュールに複数あるとか、構文エラーがどこかにあるとか
|
12
12
|
|
13
13
|
こちらの場合であれば、渋谷.xlsmを起動して、直接testの関数が実行できるかを確認になるでしょうか。
|
14
14
|
|
2
マクロが実行できない状態について追記
test
CHANGED
@@ -8,7 +8,9 @@
|
|
8
8
|
|
9
9
|
・渋谷.xlsmのマクロが実行できない状態になっている。
|
10
10
|
|
11
|
-
例えばtestという関数が複数ある
|
11
|
+
例えばtestという関数が複数あるとか、構文エラーがどこかにあるとか
|
12
|
+
|
13
|
+
こちらの場合であれば、渋谷.xlsmを起動して、直接testの関数が実行できるかを確認になるでしょうか。
|
12
14
|
|
13
15
|
|
14
16
|
|
1
セキュリティやパスの間違いでは該当メッセージが出なかった旨を追記
test
CHANGED
@@ -16,10 +16,12 @@
|
|
16
16
|
|
17
17
|
ネットでそのエラーメッセージで検索するとセキュリティー関係の設定が云々とか書いてありましたね。
|
18
18
|
|
19
|
+
|
20
|
+
|
21
|
+
ただ、セキュリティの設定が違っていても、パスが違っていても提示のメッセージは出ませんでした。
|
22
|
+
|
19
|
-
|
23
|
+
バージョンによる誤差かもしれません。
|
20
24
|
|
21
25
|
|
22
26
|
|
23
|
-
|
24
|
-
|
25
|
-
|
27
|
+
色々確認してみてそれでも駄目であれば、それぞれの確認した結果を質問に追記すればよいかと思います。
|