vba arrays

Crappola! Just spent 45 minutes posting VBA question. Answered phone, yakked, Mr. Excel timed out, and I lost the Thread. So, this time - highly summarized... Input sheet containing 150,000 + rows. Each row contains item, date, and amount. I want read each row and populate a 270 row by 366...

Is there an easy way to split an array into 2 smaller arrays. For example:FullArray(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15) Split this array into 2 arrays with first array containing the first 10 items and the second array containing the remaining items. SizePart1 = 10 SizePart2 = UBound(FullArray)...

I need to do something like this that works in VBA for Excel: HowMany As Single FromEnd As Single LargeArray As Variant NewArray As Variant HowMany = 10 FromEnd = 5 LargeArray =(1,2,3,,,10000) NewArray = LargeArray.split(HowMany, FromEnd) That doesn't work in VBA. What I want is to take a...

Hi ALL, I have data tables on 4 sheets. Each have 27 columns ( with same column headings ) but rows range from 500 to 29000. I want to create a macro to fetch data from all 4 sheets into a single array and paste it as a single table on fifth sheet as values. Is it possible?

I have need for a function to be a part of the VBA code. {=IF(H47>0,CELL("address",OFFSET(TDC!B9,0,MATCH(LARGE(IF(TDC!B9:H9>0,(TDC!B9:H9)),N47),TDC!B9:H9,0)-1)), CELL("address",OFFSET(TDC!B9,0,MATCH(SMALL(IF(TDC!B9:H9>0,(TDC!B9:H9)),N47),TDC!B9:H9,0)-1)))} Not knowing how to write this directly...

Hi All, I have following returning Run-time Error type 13. Type mismatch. I don't understand why? dim WFMBlock1 as string dim WFMDR1 as variant dim Block1S , Block1E as long Block1S=2 Block1E=19 WFMBlock1 = ActiveWorkbook.ActiveSheet.Range(Cells(5, Block1S), Cells(36, Block1E)).Address...