ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Invoice (https://www.excelbanter.com/excel-programming/340404-invoice.html)

selwonk

Invoice
 
I am trying to setup an invoice for work and need a little assitance. I
apologise for my ignorance in the following matter. I need some direction in
how to set up a formula for the following. I have three catagories, taxable,
non taxable and labor.
How do you direct each catagory to different locations for the exact total.
The taxable items need to be added together then mutiplied by the tax rate
after wich needs to be added to the total labor cost and non taxable items.
I appreciate any help and guidence on the matter

Mike Fogleman

Invoice
 
Perhaps you should take a look at an Invoice Template that comes with Excel.
Select File/New and there should be a Spreadsheet Solutions tab, or
something similar, with an Invoice file in it.

Mike F
"selwonk" wrote in message
...
I am trying to setup an invoice for work and need a little assitance. I
apologise for my ignorance in the following matter. I need some direction
in
how to set up a formula for the following. I have three catagories,
taxable,
non taxable and labor.
How do you direct each catagory to different locations for the exact
total.
The taxable items need to be added together then mutiplied by the tax rate
after wich needs to be added to the total labor cost and non taxable
items.
I appreciate any help and guidence on the matter




Vacation's Over

Invoice
 
establish 3 named ranges on your sheet
"Total", "TaxRate", "ItemType"(column in invoice)

Macro code:
Dim c as range
dim subtotals (1 to 3)

for each c in activesheet.range("ItemType")
select case c.value

case "Taxable"
subtotals (1) = subtotals (1) + c.offset (0,2).value
case "Non-Taxable"
subtotals (2) = subtotals (2) + c.offset (0,2).value
case "Labor"
subtotals (3) = subtotals (3) + c.offset (0,2).value
case else
if not c.value = "" then
msgbox "Improper Item Clasification - " & c.address
end if
end select

activesheet.Range("Total").value = _
subtotals(1) * activesheet.range("TaxRate") + subtotals(2) +subtotals(3)


"selwonk" wrote:

I am trying to setup an invoice for work and need a little assitance. I
apologise for my ignorance in the following matter. I need some direction in
how to set up a formula for the following. I have three catagories, taxable,
non taxable and labor.
How do you direct each catagory to different locations for the exact total.
The taxable items need to be added together then mutiplied by the tax rate
after wich needs to be added to the total labor cost and non taxable items.
I appreciate any help and guidence on the matter



All times are GMT +1. The time now is 12:05 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com