Well I\'ve been struggling with the little bit of code and can\'t seem to get around it ... I\'m trying to get an array from a range of cells, the array however is showing u
Try this:
Dim item As Variant MsgBox Range("D19:H19").Count item = Application.Transpose(Range("D19:H19").Value) MsgBox LBound(item) & " " & UBound(item)