該如何輸入完資料後,自動往下一儲存格繼續輸入資料 - Excel程式區 - 麻辣家族討論版版

Private Sub Worksheet_Change(ByVal Target As Range) Dim Rng As Range, R1%, R2% Set Rng = Range("B2").CurrentRegion 'CurrentRegion以任意空白列及空白欄的組合為邊界的連續範圍 If Not Application.Intersect(Target(1), Rng) Is Nothing Then ...

forum.twbts.com