回答編集履歴
1
訂正\) i=1 からなので offset の最初は i-1 からが正しい
test
CHANGED
@@ -36,7 +36,7 @@
|
|
36
36
|
|
37
37
|
Sheets("sheet" & i).Select 'シート名部分を sheet と i で組み合わせて作る
|
38
38
|
|
39
|
-
ActiveSheet.Name = op.Range("B2").offset(i,0).Value 'B2セルを先頭に行方向にオフセット
|
39
|
+
ActiveSheet.Name = op.Range("B2").offset(i-1,0).Value 'B2セルを先頭に行方向にオフセット
|
40
40
|
|
41
41
|
Next
|
42
42
|
|