Dim lastRow As Long
Dim varData As Variant
lastRow = Range("A" & Rows.Count).End(xlUp).Row
varData = Range("A1:A" & lastRow).value
More than 5 years have passed since last update.
Register as a new user and use Qiita more conveniently
- You get articles that match your needs
- You can efficiently read back useful information
- You can use dark theme