' Select B5:F5
Sub SelectRange()
    ' 以 Range 選取 B5:F5
    Range("B5:F5").Select
    Range(Range("B5", "F5")).Select
    
    ' 加入 Cell
    Range(Cells(5, 2), Cells(5, 6)).Select
    
    ' 選擇特定紀錄,應��欄位數改變
    Range(Range("B5"), Range("B5").End(xlToRight)).Select
    ' 相當選擇 "B5" 後,再按下 Ctrl + → 取得最右邊儲��格
    ' 相關參數: xlToRight, xlToLeft, xlToUp, xlToDown
End Sub

edisonx 發表在 痞客邦 PIXNET 留言(0) 人氣()