summary of data from several workbooks in another

D

des-sa

sorry for asking the question again, but i didn't quite understand the first
post. i use a template for quotes to customers. a macro was created to
save this file everytime as a new file where the quote number (generated
through another macro) and date (these are 2 cells in the file) is used as
the file name. what i need to do is to pick data from 11 cells in every new
file (which are range totals in the worksheet) and duplicate these cells'
values in a 3rd book (i.e. book1 = template, book2 = newly saved file, book3
= the file where the totals are kept).

can this be done? if possible how?
thank you
 
D

des-sa

RON,
jUST TO LET YOU KNOW:- I'M BEGINNING TO UNDERSTAND THE LOGICS, SLOWLY.
MIGHT ASK ANOTHER QUESTION. HOW LONG WILL YOU STILL BE AVAILABLE?

DISRI
 
R

Ron de Bruin

If you want to do your first macro we will help you

You must copy the code on this page in a standard module
http://www.rondebruin.nl/summary2.htm

Read how here
http://www.rondebruin.nl/code.htm

Change the following two lines of code before you run the macro.
Each workbook that is selected with GetOpenFilename should contain a sheet name
and data range that matches your changes.

ShName = "Sheet1" '<---- Change
Set Rng = Range("A1,D5:E5,Z10") '<---- Change

And run the code
 
D

des-sa

RON,
WHERE DO I PASTE THIS?:

ShName = "Sheet1" '<---- Change
Set Rng = Range("A1,D5:E5,Z10") '<---- Change
Set SummWks = Sheets("Sheet2") '<---- Change
 
R

Ron de Bruin

This are the code lines in the macro from this page
http://www.rondebruin.nl/summary2.htm

After you paste the code in a module you must change this

ShName = the name of the sheet in every workbook that you select
(you can select the workbooks you want after you run the code)

Rng = the cells you want
Do not change it in your first test
First see what happens when you run the macro the first time
 
D

des-sa

RON,
WHAT DO I DO HERE? HOW DO I "SELECT THE FILE NAMES"?
'Select the files with GetOpenFilename
FileNameXls = Application.GetOpenFilename(filefilter:="Excel Files,
*.xl*", _
MultiSelect:=True)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top