従いまして実際には. Dim rowsData As Long '行数カウント用の変数 rowsData = wsData.Cells(Rows.Count, 1).End(xlUp).Row '最後の行数を取得.
確定! 回上一頁