回答編集履歴
1
誤字の修正
answer
CHANGED
|
@@ -14,7 +14,7 @@
|
|
|
14
14
|
|
|
15
15
|
With ppShp
|
|
16
16
|
If .HasTable Then
|
|
17
|
-
For i = 1 To .Table.
|
|
17
|
+
For i = 1 To .Table.Columns.Count
|
|
18
18
|
For j = 1 To .Table.Rows.Count
|
|
19
19
|
With .Table.Cell(j, i).Shape.TextFrame2
|
|
20
20
|
.MarginLeft = 1.5
|
|
@@ -28,7 +28,4 @@
|
|
|
28
28
|
MsgBox "表ではありません"
|
|
29
29
|
End If
|
|
30
30
|
End With
|
|
31
|
-
```
|
|
31
|
+
```
|
|
32
|
-
（お詫び：
|
|
33
|
-
上記のコードは、印刷したものを打ち直したため、誤りのある可能性があります。
|
|
34
|
-
後日、確認した上で、必要な場所を修正します。）
|