Dim lastRow As Long
Dim varData As Variant
' なんらかの方法でlastRowを取得
varData = Worksheets("address").Range("B2:B" & lastRow).Value
If Not IsArray(varData) Then
varData = Array(varData)
End If
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