LinkBack URL
About LinkBacks
Hi, everyone
I have this code to copy from one workbook to another:
But a message will pop out, saying that I don't have enough memory. Anyone knows any other way to alter this?
Please Login or Register to view this content.
Thanks in advance.
Not enough memory to run
Hi, everyone
I have this code to copy from one workbook to another:
But a message will pop out, saying that I don't have enough memory. Anyone knows any other way to alter this?Please Login or Register to view this content.
Thanks in advance.
Give this a try.
Please Login or Register to view this content.
Surround your VBA code with CODE tags e.g.;
[CODE]your VBA code here[/CODE]
The # button in the forum editor will apply CODE tags around your selected text.
To give some explanation to your code used.. and the cause of the problem.
on line
you are telling excel to copy 108 columns from workbook to workbook y but those 108 columns each have 1,048,576 cells, so you are copying 113+ MILJON cells..Please Login or Register to view this content.
that will take a good while
even if your workbook has 5000 lines you would still only have just over a 0,5 miljon cells in the usedrange.. so 113 miljon is a bit of overkill to copy
Or something like this. (because UsedRange sometimes gives unexpected results)
Please Login or Register to view this content.
Avoid using Select, Selection and Activate in your code. Use With ... End With instead.
You can show your appreciation for those that have helped you by clicking the * at the bottom left of any of their posts.
Usedrange is very predictable in a newly opened workbook.Originally Posted by bakerman2
Hi, all
Thank you so much for your attention and time in this post. Really appreciate it. But I was wondering:
What does Bakerman means in this? Because I previously used UsedRange in my other code.
FYI, I can't seem to work with Bakerman's code as it shows an error in this line:
It says that the subscript is out of range. Not sure whyPlease Login or Register to view this content.
But thanks to AlphaFrog, your code works! And to Roel for your explanation.
Last edited by ell_; 04-20-2018 at 11:57 PM.
The UsedRange is recalculated when the workbook is opened or saved. So if you were to delete or clear some rows of data and visually the used range looks smaller, the actual UsedRange doesn't change until you save the workbook.
In this instance, the macro only opens the workbook and copies the data. But if you want to be extra careful, bakerman2 is correct.
Hi ! A Master tip !
No need to save, just insert before this single codeline in the procedure : ActiveSheet.UsedRange …
Or any valid worksheet reference instead of Activesheet.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
Register To Reply
Bookmarks