質問編集履歴
1
コード等の表記方法を変更
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -2,16 +2,15 @@
|
|
|
2
2
|
VBAで開いていないExcelの特定のシート名のデータをコピーし、別のブックに貼り付けようとしています。
|
|
3
3
|
|
|
4
4
|
### 発生している問題・エラーメッセージ
|
|
5
|
-
|
|
5
|
+
```VBA
|
|
6
|
-
|
|
6
|
+
実行時エラー'1004'
|
|
7
|
-
|
|
8
|
-
エラーメッセージ
|
|
9
|
-
|
|
7
|
+
'.xls'にアクセスできません。ファイルが破損しているか、応答しないサーバーにあるか、読み取り専用に設定されています。
|
|
8
|
+
```
|
|
10
9
|
（当該Excelは破損しておらず、デスクトップ上にあり、読み取り専用でもありません）
|
|
11
10
|
|
|
12
11
|
### 該当のソースコード
|
|
13
|
-
|
|
12
|
+
```VBA
|
|
14
|
-
|
|
13
|
+
Dim Path As String
|
|
15
14
|
Dim buf As String
|
|
16
15
|
Dim fso As FileSystemObject
|
|
17
16
|
Set fso = New FileSystemObject
|
|
@@ -100,6 +99,8 @@
|
|
|
100
99
|
グループ2:
|
|
101
100
|
・・・
|
|
102
101
|
|
|
102
|
+
|
|
103
|
+
```
|
|
103
104
|
### 試したこと
|
|
104
105
|
|
|
105
106
|
ネット上で2,3日調べましたが原因がわかりません。
|