質問するログイン新規登録

質問編集履歴

5

説明の修正

2020/09/17 13:07

投稿

icecleam
icecleam

スコア46

title CHANGED
File without changes
body CHANGED
@@ -14,10 +14,8 @@
14
14
  書き方を変えればうまく動く等などございましたら、申し訳ありませんが教えていただきたいです。
15
15
  よろしくお願いします。
16
16
 
17
- 作成しようとしているマクロの仕様は最下部に記載します。
18
17
 
19
18
 
20
-
21
19
  ```Macro
22
20
  Sub sample1()
23
21
 
@@ -64,15 +62,4 @@
64
62
  Set xlsAcq = Nothing
65
63
 
66
64
  End Sub
67
- ```
65
+ ```
68
-
69
-
70
- ■マクロの概要
71
- 以下の画像のようにブックからブックへ転記をしたいです。
72
- その時、転記元のエクセルファイル(拡張子はxls)が格納されているフォルダを指定してエクセルファイルに「更新」というシートがあるときだけ転記を実行したいです。
73
-
74
- 転記元
75
- ![転記元](d8e88eaf75129b0813b2d93a294a162d.png)
76
-
77
- 転記先
78
- ![転記先](e51ba7b98d24dd2c5f9ea2831d9e1e19.png)

4

タイトル変更

2020/09/17 13:07

投稿

icecleam
icecleam

スコア46

title CHANGED
@@ -1,1 +1,1 @@
1
- エラーメッセージ「クラスはオートメーションをサポートしていないか、または必要なインターフェースをサポートしていません」
1
+ マクロでブックからブックに転記をしたいが、エラーメッセージ「クラスはオートメーションをサポートしていないか、または必要なインターフェースをサポートしていません」が出てきてしまいます。
body CHANGED
File without changes

3

マクロの仕様を追記

2020/09/17 12:04

投稿

icecleam
icecleam

スコア46

title CHANGED
File without changes
body CHANGED
@@ -14,6 +14,7 @@
14
14
  書き方を変えればうまく動く等などございましたら、申し訳ありませんが教えていただきたいです。
15
15
  よろしくお願いします。
16
16
 
17
+ 作成しようとしているマクロの仕様は最下部に記載します。
17
18
 
18
19
 
19
20
 
@@ -63,4 +64,15 @@
63
64
  Set xlsAcq = Nothing
64
65
 
65
66
  End Sub
66
- ```
67
+ ```
68
+
69
+
70
+ ■マクロの概要
71
+ 以下の画像のようにブックからブックへ転記をしたいです。
72
+ その時、転記元のエクセルファイル(拡張子はxls)が格納されているフォルダを指定してエクセルファイルに「更新」というシートがあるときだけ転記を実行したいです。
73
+
74
+ 転記元
75
+ ![転記元](d8e88eaf75129b0813b2d93a294a162d.png)
76
+
77
+ 転記先
78
+ ![転記先](e51ba7b98d24dd2c5f9ea2831d9e1e19.png)

2

誤字の修正

2020/09/17 11:21

投稿

icecleam
icecleam

スコア46

title CHANGED
File without changes
body CHANGED
@@ -1,4 +1,4 @@
1
- 次のマクロをExcel for Macで実行しようとすると以下のエラーが出てしまいます。
1
+ 次のマクロをExcel for Macで実行しようとすると以下のエラーが出てしまいます。
2
2
 
3
3
  エラーメッセージ
4
4
  ----

1

文言の編集

2020/09/17 11:15

投稿

icecleam
icecleam

スコア46

title CHANGED
File without changes
body CHANGED
@@ -11,10 +11,12 @@
11
11
  Set wbAcq = xlsAcq.Workbooks.Open(strPath & strFile)
12
12
  の行で止まってしまいます。
13
13
 
14
- 実行するためにはどうすればょうか、申し訳ありませんが教えていただきたいです。
14
+ 書き方を変えればうまく動く等などござたら、申し訳ありませんが教えていただきたいです。
15
15
  よろしくお願いします。
16
16
 
17
17
 
18
+
19
+
18
20
  ```Macro
19
21
  Sub sample1()
20
22