返回列表 上一主題 發帖

for -step- next雙變數回圈怎麼寫

a = Join(Application.Transpose([b2:b11]), "  ")
Sheet2.[c4].Resize(19, 1) = Application.Transpose(Split(a))

TOP

i = 4
For Each c In Sheet1.[d10:d14]
Sheet2.Cells(i, 4) = c
i = i + 5
Next

TOP

        靜思自在 : 口說一句好話,如口出蓮花;口說一句壞話如口吐毒蛇。
返回列表 上一主題