Okay, Jeanette. I'm no programmer. I dabble, at best. BUT... I think... Open
the workbook, then hit Alt+F11 to get into the Visual Basic Editor. Scroll
down a bit until you see this:
______________________
Sub NewInvoice()
Dim rngInvNumber As Range
Sheet1.Select
Sheet1.Range("NeedDel").Select
Selection.ClearContents
Sheet1.Range("G3").Select
Set rngInvNumber = Range("Sales!A2:A1000")
For i = 1 To 1000
If rngInvNumber.Cells(i, 1) = "" Then
If Not IsNumeric(rngInvNumber.Cells(i - 1, 1).Value) Then
Sheet1.Range("G3").Value = Sheet1.Range("J4").Value
Else
Sheet1.Range("G3").Value = rngInvNumber.Cells(i - 1,
1).Value + 1
End If
Exit For
End If
Next i
Sheet1.Select
Sheet1.Range("B12").Select
End Sub
________________________
Now, change the LAST line before the End Sub to read
Sheet6.Range("B12").Select
Hit the SAVE diskette! Close the VBE.
I think that should do it!
*******************
~Anne Troy
www.OfficeArticles.com
"jeanette.rimmer" wrote in message
...
Hi, Im doing a similar project to Beth, also creating for a boss who has
little patience!!
Ive downloaded your invoices file and its very impressive.
One little question, I need to create the service type of invoice that
youve
set up. But when I click on new invoice then this goes onto the new
product
invoice screen and not the new service type. Can you give me a way to fix
this?
Thanks
Jeanette
"Anne Troy" wrote in message
news:165e3$42d80879$97c5108d$13532@allthenewsgroup s.com...
=if(isna(vlookup....),"",(vlookup....))
Also, try this for a bunch more other "features":
http://www.myexpertsonline.com/freedls/invoices.zip
*******************
~Anne Troy
www.OfficeArticles.com
"Beth" wrote in message
...
I am creating an invoice at work, and the owner will be using it as
well.
The problem is she doesn't know anything about computers so I am trying
to
make it as easy as possible. I have the invoice set up so that all she
will
have to do is type in the customers name, and then by using the vlookup
function the address and other info of the customer is automatically
entered
into the invoice. Second she needs to enter the COA number
(Certificate
of
Authenticity which is how we distinguish each autograph) and then I
also
have
a vlookupfunction for that so it will automatically display the
description
of the piece and the price. The problem is say I have the vlookup
carried
down the column so you can enter up to 10 pieces, well if the customer
only
buys 2 then the other 8 prices say #N/A because the vlookup formula
doesn't
work without the coa number. How can I make it so that doesn't show
up???
because when that error does show up, then the autosum for the total
price
of
the items doesn't work and it screws up the rest of the invoice!
Help would be greatly appreciated asap.
Thank you