質問編集履歴
2
説明の追記
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -9,6 +9,11 @@
|
|
|
9
9
|
実行時エラー424 オブジェクトが必要です
|
|
10
10
|
とのエラーが出た。
|
|
11
11
|
|
|
12
|
+
―追記-
|
|
13
|
+
エラー個所についてはfor num1の部分で現在は
|
|
14
|
+
現在は変数Zにnum1の構文を入れているので
|
|
15
|
+
変数Zの部分でエラーが出ている状態です。
|
|
16
|
+
|
|
12
17
|
```
|
|
13
18
|
|
|
14
19
|
### 該当のソースコード
|
1
誤字修正
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -36,7 +36,7 @@
|
|
|
36
36
|
.Range("N" & num1) = Worksheets(jj).Range("H" & k)
|
|
37
37
|
.Range("V" & num1) = Worksheets(jj).Range("J" & k) + Worksheets(jj).Range("K" & k)
|
|
38
38
|
.Range("R" & num2) = Worksheets(jj).Range("C" & k)
|
|
39
|
-
.Range("P" & num2) = A + Day(Sheets(
|
|
39
|
+
.Range("P" & num2) = A + Day(Sheets(jj).Range("G" & k).Value)
|
|
40
40
|
.Range("Z" & num1) = Worksheets(jj).Range("I" & k)
|
|
41
41
|
End If
|
|
42
42
|
Next num2
|