返回列表 上一主題 發帖

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

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

不好意思想教請一下大師們~~~~~
以下為自行錄製測試巨集,希望能修改為每次按下「自動填滿」按鈕時,"U2:BU2"可依T欄資料多寡自動向下填滿

例如:
1. T欄資料只到T12時,按下「自動填滿」按鈕,"U2:BU2"自動向下填滿至12列即可
2. T欄資料到T500時,按下「自動填滿」按鈕,"U2:BU2"自動向下填滿至500列

求大師們幫幫忙囉~~~~~~

Sub 自動填滿()
    Range("U2:BU2").Select
    Selection.AutoFill Destination:=Range("U2:BU197")
    Range("U2:BU197").Select
End Sub
*宅女一枚無誤*

回復 2# stillfish00

s大~~~~~感謝感謝!!!已解決小妹問題!!!非常謝謝您熱心幫忙喔!!!
*宅女一枚無誤*

TOP

        靜思自在 : 【時日莫空過】一個人在世間做了多少事,就等於壽命有多長。因此必須與時間競爭,切莫使時日空過。
返回列表 上一主題