VBA - Large Arrays are inefficient

O

onair

New Member
Joined
Sep 21, 2008
Messages
28
Had to manipulate an array of 55 columns and 700 rows creating a new array of 5 columns and 700 rows summing 55 columns into 5 depending on the column header. Turned out to be extemely slow. Have to switch to the traditional Excel SUMIFs. Is it the number of columns that makes VBA arrays so inefficient?
 
Sort by date Sort by votes
Rick, thank you for taking the time. The original array looked a little different so was the output. It is as if you would create a collection out of countries and then for each element of the colletion product an aggregated array by day.

Code: 
[TABLE="width: 1181"]
<tbody>[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][I]Input[/I]
[/TD]
[TD][B]USA[/B]
[/TD]
[TD][B]France[/B]
[/TD]
[TD][B]USA[/B]
[/TD]
[TD][B]Brazil[/B]
[/TD]
[TD][B]England[/B]
[/TD]
[TD][B]USA[/B]
[/TD]
[TD][B]Russia[/B]
[/TD]
[TD][B]Brazil[/B]
[/TD]
[TD][B]France[/B]
[/TD]
[TD][B]England[/B]
[/TD]
[TD][B]Russia[/B]
[/TD]
[TD][I]Output[/I]
[/TD]
[TD][B]USA[/B]
[/TD]
[TD][B]Brazil[/B]
[/TD]
[TD][B]France[/B]
[/TD]
[TD][B]England[/B]
[/TD]
[TD][B]Russia[/B]
[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][B]FL[/B]
[/TD]
[TD][B]Paris[/B]
[/TD]
[TD][B]MA[/B]
[/TD]
[TD][B]Rio[/B]
[/TD]
[TD][B]Glasgow[/B]
[/TD]
[TD][B]AL[/B]
[/TD]
[TD][B]Chelyabinsk[/B]
[/TD]
[TD][B]Sao Paulo[/B]
[/TD]
[TD][B]Nice[/B]
[/TD]
[TD][B]London[/B]
[/TD]
[TD][B]Tomsk[/B]
[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD="align: right"][I]1/1/2013[/I]
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]9
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]4
[/TD]
[TD][/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]21
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]19
[/TD]
[/TR]
[TR]
[TD="align: right"][I]1/2/2013[/I]
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]4
[/TD]
[TD][/TD]
[TD="align: right"]17
[/TD]
[TD="align: right"]30
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]28
[/TD]
[/TR]
[TR]
[TD="align: right"][I]1/3/2013[/I]
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]9
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]9
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]1
[/TD]
[TD][/TD]
[TD="align: right"]23
[/TD]
[TD="align: right"]28
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]24
[/TD]
[/TR]
[TR]
[TD="align: right"][I]1/4/2013[/I]
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]9
[/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]2
[/TD]
[TD][/TD]
[TD="align: right"]19
[/TD]
[TD="align: right"]31
[/TD]
[TD="align: right"]9
[/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]35
[/TD]
[/TR]
[TR]
[TD="align: right"][I]1/5/2013[/I]
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]7
[/TD]
[TD][/TD]
[TD="align: right"]8
[/TD]
[TD="align: right"]20
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]17
[/TD]
[/TR]
[TR]
[TD="align: right"][I]1/6/2013[/I]
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]9
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]5
[/TD]
[TD][/TD]
[TD="align: right"]21
[/TD]
[TD="align: right"]20
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]22
[/TD]
[/TR]
[TR]
[TD="align: right"][I]1/7/2013[/I]
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]8
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]8
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]2
[/TD]
[TD][/TD]
[TD="align: right"]16
[/TD]
[TD="align: right"]31
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]28
[/TD]
[/TR]
[TR]
[TD="align: right"][I]1/8/2013[/I]
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]8
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]7
[/TD]
[TD][/TD]
[TD="align: right"]13
[/TD]
[TD="align: right"]25
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]24
[/TD]
[/TR]
[TR]
[TD="align: right"][I]1/9/2013[/I]
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]8
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]8
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]8
[/TD]
[TD][/TD]
[TD="align: right"]10
[/TD]
[TD="align: right"]27
[/TD]
[TD="align: right"]4
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]23
[/TD]
[/TR]
[TR]
[TD="align: right"][I]1/10/2013[/I]
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]2
[/TD]
[TD="align: right"]7
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]6
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]3
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]8
[/TD]
[TD][/TD]
[TD="align: right"]15
[/TD]
[TD="align: right"]24
[/TD]
[TD="align: right"]5
[/TD]
[TD="align: right"]1
[/TD]
[TD="align: right"]22
[/TD]
[/TR]
</tbody>[/TABLE]
 
Upvote 0

Excel Facts

Ambidextrous Undo
Undo last command with Ctrl+Z or Alt+Backspace. If you use the Undo icon in the QAT, open the drop-down arrow to undo up to 100 steps.
Bump:
Rick, thank you for taking the time. The original array looked a little different so was the output. It is as if you would create a collection out of the countries and then for each element of the collection produce an aggregated array by day. The final output would be the date column, five columns (one for each of the five countries) with summed values by country. In Excel you would be doing a SUMIF function by country - date combination.
 
Upvote 0
You must log in or register to reply here.

Similar threads

H
  • Question
VBA Join arrays together
Replies
7
Views
254
henrik2h
H
B
  • Question
Add new Row in ListObject Table with data from an Array
Replies
4
Views
127
Akuini
Akuini
S
  • Solved
VBA: Am I double-calling a Sub given nested If statements? Or other inefficiencies?
Replies
8
Views
256
dreid1011
dreid1011
K
  • Question
Lottery Combinations Filter
Replies
2
Views
560
Fluff
Fluff
A
  • Question
Excel VB Organogram
Replies
1
Views
100
anuradhagrewal
A

Forum statistics

Threads
1,215,338
Messages
6,124,354
Members
449,155
Latest member
ravioli44

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top