求助，如何有规律隔行引用单元格数据

level 1

一头好心的牛楼主

如何把sheet1中数据B2、B4、B6、B8···引用到sheet2中的A1、A6、A11、A16···中

2020年07月09日 09点07分 1

level 12

KartNeve

一共有多少个数据
— — 这是小尾巴

2020年07月09日 09点07分 2

45个数据

2020年07月09日 09点07分

level 12

KartNeve

Sub test()
Dim i%
For i = 1 To 45
sheet2.Range("A" & 5 * i - 4) = Sheet1.Range("B" & 2 * i)
Next i
End Sub

2020年07月09日 10点07分 4

谢谢大神！

2020年07月09日 10点07分