MAIL MERGE

  • Thread starter Thread starter Guest
  • Start date Start date
Yes. I do it all the time for form letters and envelopes.

BTW, it is considered rude to type in all CAPS. It is referred to shouting.
 
Do you really use Excel on its own for form letters and envelopes? If so,
may I ask why? ... and how?
 
Why. Cuz I wanna. I do use mail merge with word for xmas family letters cuz
I can't seem to get the wreath border around an excel letter. Guess I would
need word again for strange size envelopes. But, I generally use excel for
the most other jobs.

How? Just design programs and macros to do what is desired. For instance:

Here is a macro that can put a variable in the return address where b1 is
the street and c1 city,st.zip
Sub ReturnAddress()
x = InputBox("1=SalesAid Software ,2=Don, 3=Don & Robbie 4="Whatever")
[Envelope!a1] = Choose(x, "SalesAid Software", "Donald B. Guillett","3","4")
End Sub
=====
This double click event put the addressee on the envelope page

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").printout
End If
End Sub
 
OK, Don, that's fine; it's your choice. You have confirmed that I haven't
missed something important! I suspect that most posters would prefer to use
ready-written programs rather than writing their own.

Don Guillett said:
Why. Cuz I wanna. I do use mail merge with word for xmas family letters cuz
I can't seem to get the wreath border around an excel letter. Guess I would
need word again for strange size envelopes. But, I generally use excel for
the most other jobs.

How? Just design programs and macros to do what is desired. For instance:

Here is a macro that can put a variable in the return address where b1 is
the street and c1 city,st.zip
Sub ReturnAddress()
x = InputBox("1=SalesAid Software ,2=Don, 3=Don & Robbie 4="Whatever")
[Envelope!a1] = Choose(x, "SalesAid Software", "Donald B. Guillett","3","4")
End Sub
=====
This double click event put the addressee on the envelope page

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").printout
End If
End Sub
---------
Don Guillett
SalesAid Software
(e-mail address removed)
"Paul" <none> wrote in message news:[email protected]...
Do you really use Excel on its own for form letters and envelopes? If so,
may I ask why? ... and how?
Click to expand...
Click to expand...
 
OP did ask about doing it in EXCEL. Maybe OP doesn't have word.....???

Yeah. I've always been called "strange". Just the other day I was designing
a floorplan for a new home using excel. I also track my stock portfolio
using a web query from excel. I keep 4 checking accounts on one page using
excel instead of quicken. etc. etc. etc. I have found that xl can do almost
anything except cook.

--
Don Guillett
SalesAid Software
(e-mail address removed)
Paul said:
OK, Don, that's fine; it's your choice. You have confirmed that I haven't
missed something important! I suspect that most posters would prefer to use
ready-written programs rather than writing their own.

Don Guillett said:
Why. Cuz I wanna. I do use mail merge with word for xmas family letters cuz
I can't seem to get the wreath border around an excel letter. Guess I would
need word again for strange size envelopes. But, I generally use excel for
the most other jobs.

How? Just design programs and macros to do what is desired. For instance:

Here is a macro that can put a variable in the return address where b1 is
the street and c1 city,st.zip
Sub ReturnAddress()
x = InputBox("1=SalesAid Software ,2=Don, 3=Don & Robbie 4="Whatever")
[Envelope!a1] = Choose(x, "SalesAid Software", "Donald B. Guillett","3","4")
End Sub
=====
This double click event put the addressee on the envelope page

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").printout
End If
End Sub
---------
Don Guillett
SalesAid Software
(e-mail address removed)
"Paul" <none> wrote in message news:[email protected]...
Do you really use Excel on its own for form letters and envelopes? If so,
may I ask why? ... and how?

Yes. I do it all the time for form letters and envelopes.

BTW, it is considered rude to type in all CAPS. It is referred to
shouting.

--
Don Guillett
SalesAid Software
(e-mail address removed)
CAN I MAIL MERGE WITH JUST EXCEL AND WITHOUT WORD
Click to expand...
Click to expand...
Click to expand...
 
John Walkenbach has something on his site for using Excel
without Word. I've used it and modified it when I've used it so
I can customize portions of letter and review it each before
sending but that is where you can start. I think you will also find
something comparable on Ron de Bruin's page.

Mail Merge - Without Word, John Walkenbach, Tip 92, in Excel,
of course. (This is the one with the Elephant -- Elephants R Us).
http://www.j-walk.com/ss/excel/tips/tip92.htm

I have a page on Mail Merge with Excel as the database to print labels
Mail Merge, Using Mail Merge with data from Excel
http://www.mvps.org/dmcritchie/excel/mailmerg.htm
--
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm

Don Guillett said:
OP did ask about doing it in EXCEL. Maybe OP doesn't have word.....???

Yeah. I've always been called "strange". Just the other day I was designing
a floorplan for a new home using excel. I also track my stock portfolio
using a web query from excel. I keep 4 checking accounts on one page using
excel instead of quicken. etc. etc. etc. I have found that xl can do almost
anything except cook.

--
Don Guillett
SalesAid Software
(e-mail address removed)
Paul said:
OK, Don, that's fine; it's your choice. You have confirmed that I haven't
missed something important! I suspect that most posters would prefer to use
ready-written programs rather than writing their own.

Don Guillett said:
Why. Cuz I wanna. I do use mail merge with word for xmas family letters cuz
I can't seem to get the wreath border around an excel letter. Guess I would
need word again for strange size envelopes. But, I generally use excel for
the most other jobs.

How? Just design programs and macros to do what is desired. For instance:

Here is a macro that can put a variable in the return address where b1 is
the street and c1 city,st.zip
Sub ReturnAddress()
x = InputBox("1=SalesAid Software ,2=Don, 3=Don & Robbie 4="Whatever")
[Envelope!a1] = Choose(x, "SalesAid Software", "Donald B. Guillett","3","4")
End Sub
=====
This double click event put the addressee on the envelope page

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").printout
End If
End Sub
---------
Don Guillett
SalesAid Software
(e-mail address removed)
"Paul" <none> wrote in message Do you really use Excel on its own for form letters and envelopes? If so,
may I ask why? ... and how?

Yes. I do it all the time for form letters and envelopes.

BTW, it is considered rude to type in all CAPS. It is referred to
shouting.

--
Don Guillett
SalesAid Software
(e-mail address removed)
CAN I MAIL MERGE WITH JUST EXCEL AND WITHOUT WORD
Click to expand...
Click to expand...
Click to expand...
 
I have been using a modification of that for a long time. I have a select
all or select none for checkmarks beside the names and then this assigned to
a shape.
Sub FORMLTR()
For Each cel In Range("B5:B46")
If UCase(cel.Offset(0, 10)) = "X" Then
[k1] = Trim(Right(cel, Len(cel) - Application.Find(",", cel)) & " " &
Left(cel, Application.Find(",", cel) - 1))
[k2] = cel.Offset(0, 1)
[k3] = cel.Offset(0, 2) & ", " & cel.Offset(0, 3) & " " & cel.Offset(0, 4)
[k4] = Trim(Right(cel, Len(cel) - Application.Find(",", cel)))
'Body of letter
[p1] = cel.Offset(0, 16)
[p1] = Application.VLookup(cel, Sheets("Assessments").Range("$c$7:$g$48"),
5, False)
x = [addresses!WhichLetter]
If Range("Preview") Then
Sheets(x).PrintPreview
Else
Sheets(x).PrintOut
End If
End If
Next
End Sub


--
Don Guillett
SalesAid Software
(e-mail address removed)
David McRitchie said:
John Walkenbach has something on his site for using Excel
without Word. I've used it and modified it when I've used it so
I can customize portions of letter and review it each before
sending but that is where you can start. I think you will also find
something comparable on Ron de Bruin's page.

Mail Merge - Without Word, John Walkenbach, Tip 92, in Excel,
of course. (This is the one with the Elephant -- Elephants R Us).
http://www.j-walk.com/ss/excel/tips/tip92.htm

I have a page on Mail Merge with Excel as the database to print labels
Mail Merge, Using Mail Merge with data from Excel
http://www.mvps.org/dmcritchie/excel/mailmerg.htm
--
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm

OP did ask about doing it in EXCEL. Maybe OP doesn't have word.....???

Yeah. I've always been called "strange". Just the other day I was designing
a floorplan for a new home using excel. I also track my stock portfolio
using a web query from excel. I keep 4 checking accounts on one page using
excel instead of quicken. etc. etc. etc. I have found that xl can do almost
anything except cook.

--
Don Guillett
SalesAid Software
(e-mail address removed)
Paul said:
OK, Don, that's fine; it's your choice. You have confirmed that I haven't
missed something important! I suspect that most posters would prefer
Click to expand...
to
use
ready-written programs rather than writing their own.

Why. Cuz I wanna. I do use mail merge with word for xmas family letters
cuz
I can't seem to get the wreath border around an excel letter. Guess I
would
need word again for strange size envelopes. But, I generally use
Click to expand...
excel
for
the most other jobs.

How? Just design programs and macros to do what is desired. For instance:

Here is a macro that can put a variable in the return address where
Click to expand...
b1
is
the street and c1 city,st.zip
Sub ReturnAddress()
x = InputBox("1=SalesAid Software ,2=Don, 3=Don & Robbie 4="Whatever")
[Envelope!a1] = Choose(x, "SalesAid Software", "Donald B.
Guillett","3","4")
End Sub
=====
This double click event put the addressee on the envelope page

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").printout
End If
End Sub
---------
Don Guillett
SalesAid Software
(e-mail address removed)
"Paul" <none> wrote in message
Do you really use Excel on its own for form letters and envelopes? If
so,
may I ask why? ... and how?

Yes. I do it all the time for form letters and envelopes.

BTW, it is considered rude to type in all CAPS. It is referred to
shouting.

--
Don Guillett
SalesAid Software
(e-mail address removed)
CAN I MAIL MERGE WITH JUST EXCEL AND WITHOUT WORD
Click to expand...
Click to expand...
Click to expand...
 
Back
Top