Consolidate (sum) last sheet (32) of all workbooks in a folder
Hi Joel,
===========
[...]
Not sure what is causing the Large Amount of data in clipboard. I can't
repeat this problem. If fixing the above statement doesn't solve the
problem
then ask in a new posting
===========
Try replacing:
ec TotalRange.Copy
AllTotalRange.PasteSpecial _
Operation:=xlAdd
with:
'copy and add data to total workbook
TotalRange.Copy
AllTotalRange.PasteSpecial _
Operation:=xlAdd
Application.CutCopyMode = False
---
Regards.
Norman
|