excelnovvce
New Member
- Joined
- Mar 19, 2018
- Messages
- 1
So this is my code:
Dim src As Workbook
Set src = Workbooks.Open("UMF_IR_ADM_<wbr style="font-family: arial, sans-serif; font-size: 12.8px;">SPARTACUS_1910 (Data as of 3-5-2018)")
Worksheets("Executive").Range(<wbr>"D7").Value = WorksheetFunction.Sum(src.<wbr>Worksheets("Data").Range("A3:<wbr>A10000"))
Worksheets("Executive").Range(<wbr>"D8").Value = WorksheetFunction.Sum(src.<wbr>Worksheets("Data").Range("AV3:<wbr>AV1854"))
which opens the UMF_IR_SPARTACUS and is supposed to take the sum of the data in the spartacus file and put it in D7 of the original workbook that I'm in. It was working before I put the src. stuff. Now it's giving me a error 9: subscript out of range. Any help would be appreciated. Thanks.
Also this isn't the full code.
Dim src As Workbook
Set src = Workbooks.Open("UMF_IR_ADM_<wbr style="font-family: arial, sans-serif; font-size: 12.8px;">SPARTACUS_1910 (Data as of 3-5-2018)")
Worksheets("Executive").Range(<wbr>"D7").Value = WorksheetFunction.Sum(src.<wbr>Worksheets("Data").Range("A3:<wbr>A10000"))
Worksheets("Executive").Range(<wbr>"D8").Value = WorksheetFunction.Sum(src.<wbr>Worksheets("Data").Range("AV3:<wbr>AV1854"))
which opens the UMF_IR_SPARTACUS and is supposed to take the sum of the data in the spartacus file and put it in D7 of the original workbook that I'm in. It was working before I put the src. stuff. Now it's giving me a error 9: subscript out of range. Any help would be appreciated. Thanks.
Also this isn't the full code.