adding range values to array

G

Gary Keramidas

what would be some options for adding only values in this range that are not
blank to the array?

arr = .Range("B12:B" & lRow).Value
 
G

Gary Keramidas

this is what i have right now:

For k = 12 To 33
If .Range("B" & k).Value > "" Then
l = l + 1
ReDim Preserve arr(1 To l)
arr(l) = .Range("B" & k).Value
End If
Next
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Baffled with assignment of range to array why won't it work??? Anyhelp appreciated 4
Array code only works on selected sheet 14
Range headings 0
array from range question 2
Resize a row but copy but skip columns I don't want to copy 6
Cells range into an array, then into msgbox 7
Adding a word to a numerical field 0
Search other sheets for numbers & color them 10

Top