One VBA Solution here to Split Range in Array.
You just need to Use formula =SplitMe(Range,RowNum,ColNum)
RajanCode:Function SplitMe(rng As Range, lngRow As Long, lngCol As Long) As Variant Dim VarArr() Dim VarArr2 Dim lngRowCount As Long Dim lngColCount As Long Dim lngCounter lngCounter = 0 VarArr2 = Split(rng.Value, ",") ReDim VarArr(0 To lngRow - 1, 0 To lngCol - 1) For lngColCount = 0 To lngCol - 1 For lngRowCount = 0 To lngRow - 1 VarArr(lngRowCount, lngColCount) = VarArr2(lngCounter) lngCounter = lngCounter + 1 Next Next SplitMe = VarArr End Function




Reply With Quote

Bookmarks