返回列表 上一主題 發帖

[發問] 當使用OFFSET語法時, 如何貼成值

回復 1# xoofer


    這樣嗎?
  1. Sub test()
  2. For i = 1 To 5
  3. Range("G1").Copy
  4. Range("g1").Offset(i, 0).PasteSpecial xlPasteValues
  5. Next
  6. End Sub
複製代碼

TOP

        靜思自在 : 愛不是要求對方,而是要由自身的付出。
返回列表 上一主題