Excel, adding figures from one cell to a summary sheet or workbook

petercoe wrote:
> Thank you, Dave.
> I have to learn all of this. As soon as I know, I will let you know how
> this worked out.
> Pete
>
>
>
> Dave Peterson wrote:
> > Maybe...
> >
> > If all the workbooks are in the same folder and you pick up the same cell from
> > the same worksheet each time, you could use something like:
> >
> > Option Explicit
> > Sub testme01()
> >
> > Dim myFileNames As Variant
> > Dim RptWks As Worksheet
> > Dim wkbk As Workbook
> > Dim fCtr As Long
> >
> > myFileNames = Application.GetOpenFilename("Excel Files, *.xls", _
> > MultiSelect:=True)
> >
> >



Dave, When I get to the above line in VBA I get an error message as
follows:

Compile Error: Expected:List separator or )

Also I an expecting that I should substitute some actual file names
some where in this code?

I do not know much about macros. I only wrote one small basic program
in my life and a number of .BAT files when I used Dos 3.3
The file I'm using for test purposes is on my desktop and it's called
"Invoice Test". The workbooks? are R1001, R1002, R1003, etc and one
book called "Template".


> > petercoe wrote:
> > >
> > > We are using a template for rental invoicing. There is one cell that
> > > adds a damage waiver premium of 2% or 10% of the rental cost. In one
> > > cell I make the choice of 2 or 10 and the amount automatically appears
> > > in the damage waiver cell. We save the invoices as R1001, R1002, R1003
> > > and so on. I need to extract the damage waiver costs in two different
> > > totals, one for the 2% charge and one for the 10% charge because we
> > > have to pay different percentages as insurance premiums for these
> > > charges at the end of each month. Is there a way to do this
> > > automatically so I don't have to view each invoice and add manually?
> > >
> > > Tia, Petercoe

That line shouldn't cause an error. Maybe something was inserted by google for
formatting???

If you delete that line and retype it (carefully), does it work ok?

And you'll have to select the files you want (click on the first and ctrl-click
(or shift-click)) on subsequent files in that dialog.

Just like you can open more than one file when you do file|open in excel.

petercoe wrote:
>
> petercoe wrote:
> > Thank you, Dave.
> > I have to learn all of this. As soon as I know, I will let you know how
> > this worked out.
> > Pete
> >
> >
> >
> > Dave Peterson wrote:
> > > Maybe...
> > >
> > > If all the workbooks are in the same folder and you pick up the same cell from
> > > the same worksheet each time, you could use something like:
> > >
> > > Option Explicit
> > > Sub testme01()
> > >
> > > Dim myFileNames As Variant
> > > Dim RptWks As Worksheet
> > > Dim wkbk As Workbook
> > > Dim fCtr As Long
> > >
> > > myFileNames = Application.GetOpenFilename("Excel Files, *.xls", _
> > > MultiSelect:=True)
> > >
> > >
>
> Dave, When I get to the above line in VBA I get an error message as
> follows:
>
> Compile Error: Expected:List separator or )
>
> Also I an expecting that I should substitute some actual file names
> some where in this code?
>
> I do not know much about macros. I only wrote one small basic program
> in my life and a number of .BAT files when I used Dos 3.3
> The file I'm using for test purposes is on my desktop and it's called
> "Invoice Test". The workbooks? are R1001, R1002, R1003, etc and one
> book called "Template".
>
> > > petercoe wrote:
> > > >
> > > > We are using a template for rental invoicing. There is one cell that
> > > > adds a damage waiver premium of 2% or 10% of the rental cost. In one
> > > > cell I make the choice of 2 or 10 and the amount automatically appears
> > > > in the damage waiver cell. We save the invoices as R1001, R1002, R1003
> > > > and so on. I need to extract the damage waiver costs in two different
> > > > totals, one for the 2% charge and one for the 10% charge because we
> > > > have to pay different percentages as insurance premiums for these
> > > > charges at the end of each month. Is there a way to do this
> > > > automatically so I don't have to view each invoice and add manually?
> > > >
> > > > Tia, Petercoe

--

Dave Peterson