質問編集履歴
3
画像の追加
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -1,4 +1,4 @@
|
|
|
1
|
-
|
|
1
|
+
いろいろネットで調べてたが上手くいかない為ご教授下さい。
|
|
2
2
|
|
|
3
3
|
調べた結果**GetOpenFilename**を使用してフォルダ開くのは分かったのですが
|
|
4
4
|
|
|
@@ -65,3 +65,5 @@
|
|
|
65
65
|
###追記
|
|
66
66
|
|
|
67
67
|
アドレスはフォルダの上の部分(添付ファイルの画像)をコピペすれば良いのでしょうか？
|
|
68
|
+
|
|
69
|
+
|
2
画像の追加
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -1,4 +1,4 @@
|
|
|
1
|
-
いろいろネットで調べてたが上手くいかない為ご教授下さい。
|
|
1
|
+
いろいろネットで調べてたが上手くいかない為ご教授下さい。
|
|
2
2
|
|
|
3
3
|
調べた結果**GetOpenFilename**を使用してフォルダ開くのは分かったのですが
|
|
4
4
|
|
|
@@ -59,3 +59,9 @@
|
|
|
59
59
|
ご不明な点がございましたらコメント下さい。
|
|
60
60
|
|
|
61
61
|
よろしくお願いします。
|
|
62
|
+
|
|
63
|
+
|
|
64
|
+
|
|
65
|
+
###追記
|
|
66
|
+
|
|
67
|
+
アドレスはフォルダの上の部分(添付ファイルの画像)をコピペすれば良いのでしょうか？
|
1
試した事の追加
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -14,7 +14,21 @@
|
|
|
14
14
|
|
|
15
15
|
### 試した事
|
|
16
16
|
|
|
17
|
-
開きたいフォルダのパスをコピーして**ChDir**に挿入しても上手くいきませんでした。
|
|
17
|
+
①開きたいフォルダのパスをコピーして**ChDir**に挿入しても上手くいきませんでした。
|
|
18
|
+
|
|
19
|
+
②下記コードで出力されたパスを挿入しても上手くいきませんでした。
|
|
20
|
+
|
|
21
|
+
```VBA
|
|
22
|
+
|
|
23
|
+
Dim a As String
|
|
24
|
+
|
|
25
|
+
a = ThisWorkbook.Path
|
|
26
|
+
|
|
27
|
+
Debug.Print a
|
|
28
|
+
|
|
29
|
+
|
|
30
|
+
|
|
31
|
+
```
|
|
18
32
|
|
|
19
33
|
|
|
20
34
|
|
|
@@ -24,7 +38,7 @@
|
|
|
24
38
|
|
|
25
39
|
|
|
26
40
|
|
|
27
|
-
|
|
41
|
+
###問題のコード
|
|
28
42
|
|
|
29
43
|
```VBA
|
|
30
44
|
|
|
@@ -43,3 +57,5 @@
|
|
|
43
57
|
いろいろと分からない事だらけです。
|
|
44
58
|
|
|
45
59
|
ご不明な点がございましたらコメント下さい。
|
|
60
|
+
|
|
61
|
+
よろしくお願いします。
|