質問編集履歴
1
コードに不備がありましたので、修正しました
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -60,8 +60,8 @@
|
|
|
60
60
|
Set mytable1 = ActiveDocument.Tables(1) ←このあたりで、エラーが発生しているようです。
|
|
61
61
|
mytable1.Cell(2, 2) = Sheets("Input").Range("B1").Value
|
|
62
62
|
mytable1.Cell(3, 2) = Sheets("Input").Range("B2").Value
|
|
63
|
-
|
|
63
|
+
mytable1.Cell(4, 2) = Sheets("Input").Range("B3").Value
|
|
64
|
-
|
|
64
|
+
mytable1.Cell(5, 2) = Sheets("Input").Range("B4").Value
|
|
65
65
|
|
|
66
66
|
End With
|
|
67
67
|
|