+ -

2019-06-19

〔VBA〕從非連續的選取區取值(Selection.Areas)--v009


章老師的電腦小講堂 https://www.facebook.com/ScenicSchool/
※※ 本區做為經常使用之程式碼複製區，提問請至小講堂唷 ※※

【使用迴圈一列列讀取選取範圍裡的資料】
Dim sArea  As Range
Dim sRow As Range
For Each sArea In Selection.Areas               '選取範圍裡的每個區域
    For Each sRow In sArea.Rows             '區域裡的每一列
        [A欄的內容] = sRow.Range("A1")
    Next
Next
Set sArea=Nothing:Set sRow=Nothing

參考文件：

5 章老師的電腦小講堂: 〔VBA〕從非連續的選取區取值(Selection.Areas)--v009 章老師的電腦小講堂 https://www.facebook.com/ScenicSchool/ ※※ 本區做為經常使用之程式碼複製區，提問請至小講堂唷 ※※ 【使用 迴圈一列列讀取選取範圍裡的資料 】 Dim sArea  As Range Dim sRow ...
小講堂經過多次搬移，舊文章連結及內容較難整理~
大家可以新文章為主~
每篇文章後有代碼，任何文章問題可至FB小講堂用代碼提問唷~