Printing Names & addresses on Envelopes - how?

  • Thread starter Thread starter Martin ©¿©¬
  • Start date Start date
M

Martin ©¿©¬

Hi
I haved a spreadsheet with names, addresses, postcode etc that I
usually print onto labels using Word & then stick on envelopes.
Is it possible to print directly onto envelopes?
If so how would I go about that?
Thank you
 
Hi
I haved a spreadsheet with names, addresses, postcode etc that I
usually print onto labels using Word & then stick on envelopes.
Is it possible to print directly onto envelopes?
If so how would I go about that?
Thank you
Click to expand...
I have an xl file where I do this using only excel. First you must set up an envelope sheet that prints your envelope on your printer. Then, a loopingmacro or a double click event (for one) to put the lines of the envelope.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 1 Then
If ActiveCell.Offset(0, 2) <> "" Then
Title = ActiveCell.Offset(0, 2)
Else
Title = ""
End If
If ActiveCell.Offset(0, 1) <> "" Then
FirstName = ActiveCell.Offset(0, 1) & " "
Else
FirstName = ""
End If
LastName = ActiveCell
ADDRESSEE = Application.Proper(Title + FirstName + LastName)
[envelope!c6] = ADDRESSEE
[envelope!c7] = ActiveCell.Offset(0, 3)
[envelope!c8] = ActiveCell.Offset(0, 4)
[envelope!c9] = ActiveCell.Offset(0, 5)
Sheets("envelope").Select
End If
End Sub
 
Mail Merge in Word has the option to generate envelopes
Click to expand...
Hi Chris
I have tried that, however, after I have chosen my recipients from my
existing list and then went to merge field, the details were all
gobble-de-gook
That was yesterday, today following your reply I tried again with a
different recepients list & it worked fine hiphip!!
So my original receipients list must be faulty
 
Back
Top