Roderick_E
Well-known Member
- Joined
- Oct 13, 2007
- Messages
- 2,051
I'm trying to use an array instead of a range so I can loop through it more efficiently. I thought I understood the various documentation I researched but can't get it to work. Here's my set up/code:
Please help explain why I'm not getting a result. Thanks
DEBUG isn't returning anything
Please help explain why I'm not getting a result. Thanks
Code:
Dim Arr() As Variant
lastrow = 0 'reset
lastrow = plwbk.Sheets(1).Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row
Arr = plwbk.Sheets(1).Range("B1:B" & lastrow)
For p = LBound(Arr) To UBound(Arr)
Debug.Print Arr(p)
next p
DEBUG isn't returning anything