返回列表 上一主題 發帖

[發問] VBA多欄自動向下填滿

回復 1# msmplay
  1. Sub 自動填滿()
  2.     Dim r
  3.     r = Cells(Rows.Count, "T").End(xlUp).Row
  4.     Range("U2:BU2").AutoFill Destination:=Range("U2:BU" & r), Type:=xlFillCopy
  5.     Range("U2:BU" & r).Select
  6. End Sub
複製代碼
表達不清、題意不明確、沒附檔案格式、沒有討論問題的態度~~~~~~以上愛莫能助。

TOP

        靜思自在 : 真正的愛心,是照顧好自己的這顆心。
返回列表 上一主題