how to print receipts from excell

[wolfmasterr]

I need to print receipts from excel, but I need the information to be placed
in specific location on the receipt:
Name........
Amount........
Date paid........
Date paid to......
Any help deeply appreciated

[Kassie]

This can be easily done, but shucks, we'll need some info to work with!
Where does the data come from, which are the "specific location"'s for the
target cells.

You need to design your receipt, and you need to decide how to populate the
fields you want to complete. In other words, are you going to type in the
info, are you going to pull it in from another sheet or location, or what.
How are you going to handle receipt numbering etc.

"wolfmasterr" wrote:

> I need to print receipts from excel, but I need the information to be placed
> in specific location on the receipt:
> Name........
> Amount........
> Date paid........
> Date paid to......
> Any help deeply appreciated
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>

[wolfmasterr]

I already have a sheet made up that is set up to record the dates and
amounts paid.
Amount paid is in cells c4:c14
date s from d4:d14
date to e4:e14
names a4:a14
room number b4:b14

"Kassie" wrote:

> This can be easily done, but shucks, we'll need some info to work with!
> Where does the data come from, which are the "specific location"'s for the
> target cells.
>
> You need to design your receipt, and you need to decide how to populate the
> fields you want to complete. In other words, are you going to type in the
> info, are you going to pull it in from another sheet or location, or what.
> How are you going to handle receipt numbering etc.
>
> "wolfmasterr" wrote:
>
> > I need to print receipts from excel, but I need the information to be placed
> > in specific location on the receipt:
> > Name........
> > Amount........
> > Date paid........
> > Date paid to......
> > Any help deeply appreciated
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >

[Kassie]

And it is this info that you want to use to populate your planned receipt?
Would you agree to the following setup for your receipt:

D5 = Date issued
B7 = Name of customer
B9 = Amount (Do you want figures, words or both)
B12 = For
B14 = Date from
D14 = Date to

don't give me such a hard time :-)

"wolfmasterr" wrote:

> I already have a sheet made up that is set up to record the dates and
> amounts paid.
> Amount paid is in cells c4:c14
> date s from d4:d14
> date to e4:e14
> names a4:a14
> room number b4:b14
>
> "Kassie" wrote:
>
> > This can be easily done, but shucks, we'll need some info to work with!
> > Where does the data come from, which are the "specific location"'s for the
> > target cells.
> >
> > You need to design your receipt, and you need to decide how to populate the
> > fields you want to complete. In other words, are you going to type in the
> > info, are you going to pull it in from another sheet or location, or what.
> > How are you going to handle receipt numbering etc.
> >
> > "wolfmasterr" wrote:
> >
> > > I need to print receipts from excel, but I need the information to be placed
> > > in specific location on the receipt:
> > > Name........
> > > Amount........
> > > Date paid........
> > > Date paid to......
> > > Any help deeply appreciated
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >

[wolfmasterr]

yes that would be perfect Kassie, B9 figures only ( currency)

"Kassie" wrote:

> And it is this info that you want to use to populate your planned receipt?
> Would you agree to the following setup for your receipt:
>
> D5 = Date issued
> B7 = Name of customer
> B9 = Amount (Do you want figures, words or both)
> B12 = For
> B14 = Date from
> D14 = Date to
>
> don't give me such a hard time :-)
>
> "wolfmasterr" wrote:
>
> > I already have a sheet made up that is set up to record the dates and
> > amounts paid.
> > Amount paid is in cells c4:c14
> > date s from d4:d14
> > date to e4:e14
> > names a4:a14
> > room number b4:b14
> >
> > "Kassie" wrote:
> >
> > > This can be easily done, but shucks, we'll need some info to work with!
> > > Where does the data come from, which are the "specific location"'s for the
> > > target cells.
> > >
> > > You need to design your receipt, and you need to decide how to populate the
> > > fields you want to complete. In other words, are you going to type in the
> > > info, are you going to pull it in from another sheet or location, or what.
> > > How are you going to handle receipt numbering etc.
> > >
> > > "wolfmasterr" wrote:
> > >
> > > > I need to print receipts from excel, but I need the information to be placed
> > > > in specific location on the receipt:
> > > > Name........
> > > > Amount........
> > > > Date paid........
> > > > Date paid to......
> > > > Any help deeply appreciated
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >

[Kassie]

Hi Wolfmasterr

Not sure whether this post posted, so here goes again.

I take it that you use row 14 only to input the info for your receipt?

Set up your receipt sheet (Sheet 2) as suggested. Use Column A as your
headings. In row 14 on your other sheet, create a field called Number in
cell F14, and insert the next receipt number there.

Now press<Alt><F11>, click on Insert| Module, and copy the following code
there:

Dim cRoom As Long
Dim pAmount As Integer
Dim dFrom As Date
Dim dTo As Date
Dim cells

Worksheets("Sheet1").Activate
If IsEmpty(Range("A14")) Then
GoTo Errorhandler
End If
rNumber = Range("F14")
cName = Range("A14")
cRoom = Range("B14")
pAmount = Range("C14")
dFrom = Range("D14")
dTo = Range("E14")
Worksheets("Sheet2").Activate
Range("D3") = rNumber
Range("D5") = Now()
Range("B7") = cName
Range("B9") = pAmount
Range("B12") = cRoom
Range("B14") = dFrom
Range("D14") = dTo
Range("A1:D14").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Worksheets("Sheet1").Activate
Range("A14:E14").ClearContents
rNumber = rNumber + 1
Range("F14") = rNumber

Exit Sub
Errorhandler:
MsgBox ("Please complete details before attempting this operation")
Exit Sub
End Sub

I would suggest that you add code to save your work, after every receipt is
printed, to ensure that your numbers are always correct. You run this macro
by pressing <Alt><F8>, selecting the macro and clicking on Run. You can also
add a button to the right of, or below the current input range on Sheet 1,
and run the macro from there.

"wolfmasterr" wrote:

> yes that would be perfect Kassie, B9 figures only ( currency)
>
> "Kassie" wrote:
>
> > And it is this info that you want to use to populate your planned receipt?
> > Would you agree to the following setup for your receipt:
> >
> > D5 = Date issued
> > B7 = Name of customer
> > B9 = Amount (Do you want figures, words or both)
> > B12 = For
> > B14 = Date from
> > D14 = Date to
> >
> > don't give me such a hard time :-)
> >
> > "wolfmasterr" wrote:
> >
> > > I already have a sheet made up that is set up to record the dates and
> > > amounts paid.
> > > Amount paid is in cells c4:c14
> > > date s from d4:d14
> > > date to e4:e14
> > > names a4:a14
> > > room number b4:b14
> > >
> > > "Kassie" wrote:
> > >
> > > > This can be easily done, but shucks, we'll need some info to work with!
> > > > Where does the data come from, which are the "specific location"'s for the
> > > > target cells.
> > > >
> > > > You need to design your receipt, and you need to decide how to populate the
> > > > fields you want to complete. In other words, are you going to type in the
> > > > info, are you going to pull it in from another sheet or location, or what.
> > > > How are you going to handle receipt numbering etc.
> > > >
> > > > "wolfmasterr" wrote:
> > > >
> > > > > I need to print receipts from excel, but I need the information to be placed
> > > > > in specific location on the receipt:
> > > > > Name........
> > > > > Amount........
> > > > > Date paid........
> > > > > Date paid to......
> > > > > Any help deeply appreciated
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > >

[wolfmasterr]

That is great Kassie thankyou it works perfectly

"Kassie" wrote:

> Hi Wolfmasterr
>
> Not sure whether this post posted, so here goes again.
>
> I take it that you use row 14 only to input the info for your receipt?
>
> Set up your receipt sheet (Sheet 2) as suggested. Use Column A as your
> headings. In row 14 on your other sheet, create a field called Number in
> cell F14, and insert the next receipt number there.
>
> Now press<Alt><F11>, click on Insert| Module, and copy the following code
> there:
>
> Dim cRoom As Long
> Dim pAmount As Integer
> Dim dFrom As Date
> Dim dTo As Date
> Dim cells
>
> Worksheets("Sheet1").Activate
> If IsEmpty(Range("A14")) Then
> GoTo Errorhandler
> End If
> rNumber = Range("F14")
> cName = Range("A14")
> cRoom = Range("B14")
> pAmount = Range("C14")
> dFrom = Range("D14")
> dTo = Range("E14")
> Worksheets("Sheet2").Activate
> Range("D3") = rNumber
> Range("D5") = Now()
> Range("B7") = cName
> Range("B9") = pAmount
> Range("B12") = cRoom
> Range("B14") = dFrom
> Range("D14") = dTo
> Range("A1:D14").Select
> ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
> Worksheets("Sheet1").Activate
> Range("A14:E14").ClearContents
> rNumber = rNumber + 1
> Range("F14") = rNumber
>
> Exit Sub
> Errorhandler:
> MsgBox ("Please complete details before attempting this operation")
> Exit Sub
> End Sub
>
> I would suggest that you add code to save your work, after every receipt is
> printed, to ensure that your numbers are always correct. You run this macro
> by pressing <Alt><F8>, selecting the macro and clicking on Run. You can also
> add a button to the right of, or below the current input range on Sheet 1,
> and run the macro from there.
>
> "wolfmasterr" wrote:
>
> > yes that would be perfect Kassie, B9 figures only ( currency)
> >
> > "Kassie" wrote:
> >
> > > And it is this info that you want to use to populate your planned receipt?
> > > Would you agree to the following setup for your receipt:
> > >
> > > D5 = Date issued
> > > B7 = Name of customer
> > > B9 = Amount (Do you want figures, words or both)
> > > B12 = For
> > > B14 = Date from
> > > D14 = Date to
> > >
> > > don't give me such a hard time :-)
> > >
> > > "wolfmasterr" wrote:
> > >
> > > > I already have a sheet made up that is set up to record the dates and
> > > > amounts paid.
> > > > Amount paid is in cells c4:c14
> > > > date s from d4:d14
> > > > date to e4:e14
> > > > names a4:a14
> > > > room number b4:b14
> > > >
> > > > "Kassie" wrote:
> > > >
> > > > > This can be easily done, but shucks, we'll need some info to work with!
> > > > > Where does the data come from, which are the "specific location"'s for the
> > > > > target cells.
> > > > >
> > > > > You need to design your receipt, and you need to decide how to populate the
> > > > > fields you want to complete. In other words, are you going to type in the
> > > > > info, are you going to pull it in from another sheet or location, or what.
> > > > > How are you going to handle receipt numbering etc.
> > > > >
> > > > > "wolfmasterr" wrote:
> > > > >
> > > > > > I need to print receipts from excel, but I need the information to be placed
> > > > > > in specific location on the receipt:
> > > > > > Name........
> > > > > > Amount........
> > > > > > Date paid........
> > > > > > Date paid to......
> > > > > > Any help deeply appreciated
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >

[Kassie]

That was a pleasure, thanks for the response

"wolfmasterr" wrote:

> That is great Kassie thankyou it works perfectly
>
> "Kassie" wrote:
>
> > Hi Wolfmasterr
> >
> > Not sure whether this post posted, so here goes again.
> >
> > I take it that you use row 14 only to input the info for your receipt?
> >
> > Set up your receipt sheet (Sheet 2) as suggested. Use Column A as your
> > headings. In row 14 on your other sheet, create a field called Number in
> > cell F14, and insert the next receipt number there.
> >
> > Now press<Alt><F11>, click on Insert| Module, and copy the following code
> > there:
> >
> > Dim cRoom As Long
> > Dim pAmount As Integer
> > Dim dFrom As Date
> > Dim dTo As Date
> > Dim cells
> >
> > Worksheets("Sheet1").Activate
> > If IsEmpty(Range("A14")) Then
> > GoTo Errorhandler
> > End If
> > rNumber = Range("F14")
> > cName = Range("A14")
> > cRoom = Range("B14")
> > pAmount = Range("C14")
> > dFrom = Range("D14")
> > dTo = Range("E14")
> > Worksheets("Sheet2").Activate
> > Range("D3") = rNumber
> > Range("D5") = Now()
> > Range("B7") = cName
> > Range("B9") = pAmount
> > Range("B12") = cRoom
> > Range("B14") = dFrom
> > Range("D14") = dTo
> > Range("A1:D14").Select
> > ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
> > Worksheets("Sheet1").Activate
> > Range("A14:E14").ClearContents
> > rNumber = rNumber + 1
> > Range("F14") = rNumber
> >
> > Exit Sub
> > Errorhandler:
> > MsgBox ("Please complete details before attempting this operation")
> > Exit Sub
> > End Sub
> >
> > I would suggest that you add code to save your work, after every receipt is
> > printed, to ensure that your numbers are always correct. You run this macro
> > by pressing <Alt><F8>, selecting the macro and clicking on Run. You can also
> > add a button to the right of, or below the current input range on Sheet 1,
> > and run the macro from there.
> >
> > "wolfmasterr" wrote:
> >
> > > yes that would be perfect Kassie, B9 figures only ( currency)
> > >
> > > "Kassie" wrote:
> > >
> > > > And it is this info that you want to use to populate your planned receipt?
> > > > Would you agree to the following setup for your receipt:
> > > >
> > > > D5 = Date issued
> > > > B7 = Name of customer
> > > > B9 = Amount (Do you want figures, words or both)
> > > > B12 = For
> > > > B14 = Date from
> > > > D14 = Date to
> > > >
> > > > don't give me such a hard time :-)
> > > >
> > > > "wolfmasterr" wrote:
> > > >
> > > > > I already have a sheet made up that is set up to record the dates and
> > > > > amounts paid.
> > > > > Amount paid is in cells c4:c14
> > > > > date s from d4:d14
> > > > > date to e4:e14
> > > > > names a4:a14
> > > > > room number b4:b14
> > > > >
> > > > > "Kassie" wrote:
> > > > >
> > > > > > This can be easily done, but shucks, we'll need some info to work with!
> > > > > > Where does the data come from, which are the "specific location"'s for the
> > > > > > target cells.
> > > > > >
> > > > > > You need to design your receipt, and you need to decide how to populate the
> > > > > > fields you want to complete. In other words, are you going to type in the
> > > > > > info, are you going to pull it in from another sheet or location, or what.
> > > > > > How are you going to handle receipt numbering etc.
> > > > > >
> > > > > > "wolfmasterr" wrote:
> > > > > >
> > > > > > > I need to print receipts from excel, but I need the information to be placed
> > > > > > > in specific location on the receipt:
> > > > > > > Name........
> > > > > > > Amount........
> > > > > > > Date paid........
> > > > > > > Date paid to......
> > > > > > > Any help deeply appreciated
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >