回答編集履歴
1
構文エラー修正
test
CHANGED
|
@@ -4,7 +4,7 @@
|
|
|
4
4
|
|
|
5
5
|
```VBA
|
|
6
6
|
|
|
7
|
-
Worksheets(sename).Range(Worksheets(sename).Worksheets(sename).Cells(
|
|
7
|
+
Worksheets(sename).Range(Worksheets(sename).Cells(3, 1), Worksheets(sename).Cells(102, 7)).Borders.LineStyle = xlContinuous '格子作成
|
|
8
8
|
|
|
9
9
|
Worksheets(sename).Range(Worksheets(sename).Cells(102, 1), Worksheets(sename).Cells(102, 7)).BorderAround Weight:=xlThick '周囲太枠
|
|
10
10
|
|