copy 2 cells from multiple sheets to one sheet

[StartingOut]

Sorry my original post went in the wrong place sorry

Hi, I am new here and hope I can get some help, I have read several topics on the form and I looks like this is the place for help.
I have a workbook with 400 sheets called "Lot 1" to "Lot 400 and and sheets "Lot A" through "Lot Z" and lastly sheets "CAB 1" through "CAB 30" On each of these sheets which are Invoices, are the respective Lot, or CAB number in the same cell on each sheet (D12) and on each sheet there is a dolar value representing money owed in cell (K49) My question is how can I have Cell D12 and K49 be sent to a sheet I called AccountsReceivable only if cell K49 has a $value greater then 0. I need the contents of D12 and K49 to be side by side in column A & B on AccountsReceivable sheet

[JBeaucaire]

A macro would be quickest for this.

How/Where to install the macro:

1. Open up your workbook
2. Get into VB Editor (Press Alt+F11)
3. Insert a new module (Insert > Module)
4. Copy and Paste in your code

Please Login or Register  to view this content.

5. Get out of VBA (Press Alt+Q)
6. Save as a macro-enabled workbook

The macro is installed and ready to use. Press Alt-F8 and select AssembleSummary from the macro list.

[StartingOut]

Wow thats awsom thank you it works like a charm. 1 question is there a way to automate this or will I need to run the macro manualy when I want to update the data is there a way to have the code run every time a change is made to the workbook. maybe adding some code to a UserForm button control. I have 2 UserForms that are used to imput the data on all the sheets. if I added code to the OK button on each UserForm that ran the macro after the Userform completed. is this possible?

[JBeaucaire]

I suppose you can do that. You know what your needs are.

Please Login or Register  to view this content.