質問編集履歴
2
プログラム内のコメントを削除しました
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -17,7 +17,7 @@
|
|
|
17
17
|
Dim OpenFileName As String
|
|
18
18
|
|
|
19
19
|
With CreateObject("WScript.Shell")
|
|
20
|
-
|
|
20
|
+
.CurrentDirectory = "\\abc-aws.def.jp\share\ABC\DEF"
|
|
21
21
|
|
|
22
22
|
End With
|
|
23
23
|
|
1
タイトルに概要を追記
test
CHANGED
|
@@ -1 +1 @@
|
|
|
1
|
-
VBAのGetOpenFilenameでネットワークドライブのフォルダ
|
|
1
|
+
VBAのGetOpenFilenameで指定したネットワークドライブのフォルダがデフォルト表示させず、ローカルのマイドキュメントが表示されてしまう
|
test
CHANGED
|
File without changes
|