Modify Existing Mbr Code to Save to Ext.Workbook

Morning All,

The code attached was provided within this forum, but I think I borked it cause it's not quite doing what I'm needing. Intended theme, to add data cells to next available area of the DB skipping the header row. The row column search for finding next available area should be defined by column G, H or I of the "DB"

1.) I need the active sheet - Sheets("Master (2)") - to copy only the data filled cells in the range of A:R to my - Sheets("DB") - in range G:X skipping the header row (Row 1)
2.) Additionally, I need to copy from ("Master (2)") active cells in Column AA to ("DB") Column Y following the same 'find next available cell' philosophy.

*Edit

3.) Sorry, will also need columns G:Y of the "DB" to sort by
A.) Property Case ; Values ; A to Z
B.) Date ; Values ; Newest to Oldest.

Thank you very much!

Please Login or Register  to view this content.

Try this

Please Login or Register  to view this content.

Attach a sample workbook. Make sure there is just enough data to make it clear what is needed. Include BEFORE/AFTER sheets if needed to show the process you're trying to complete or automate. Remember to desensitize the data.

Click on GO ADVANCED and use the paperclip icon to open the upload window.

View Pic

Hi miskondukt

This Code is in the attached...let me know of issues.

Please Login or Register  to view this content.

Fantastic! Thank for getting this going. Excellent job.

You're welcome...glad I could help. Thanks for the Rep.

Hi miskondukt

Try this

Please Login or Register  to view this content.

Hi miskondukt

Please don't quote entire Posts...quote only the items that are relative to your new Post.

If I understand your issue try this Code to

the copy and paste data, to be saved to an external document

Change the three lines as indicated.

Please Login or Register  to view this content.

Good Morning,

After changing the lines as indicated, I got a "Compile Error: Type mismatch" for the following line:

Please Login or Register  to view this content.

That I had changed to:

Please Login or Register  to view this content.

OR should this just indicate the Tab name of the document that wb2 is instructed to open?

I used =cell("filename") to extract the exact name to use.

Hi miskondukt

This line of Code

Please Login or Register  to view this content.

is setting ws2 to the name of the Worksheet you wish to use in the Workbook you opened here

Please Login or Register  to view this content.

What's the Name of that Worksheet you wish to use?

The worksheet in the opening filename is "DB"

Please Login or Register  to view this content.

Produced ExtDBError.PNG
The attached image shows a "DB" at the end of the file location. I had removed that after this error since we're setting the worksheet via ws2 but it still produced the same error. It appears to be adding an "xlsx" in itsself when searching for the macro-enabled document. I suppose this DB doc could be without macros, if that makes any difference.

And the full file name of the document is as listed above.


The entire code:

Please Login or Register  to view this content.

Hi miskondukt

Were I you I'd ditch the shorthand. I'd write this line of Code

Please Login or Register  to view this content.

like this

Please Login or Register  to view this content.

and see what it does...get back to me.

Of course, I'm assuming you've checked the Path???

You're welcome...glad I could help.