printing addresses from letters onto envelopes

Hello

When Apple design an application, they don't take a photocopier to replicate what other are already doing. They use their brains and statistics to select features matching what appears to be the needs of the supposed users.

You wrote about a function which you find usefull. It's your advice.
Maybe it's not a feature really usefull to many of us.

As you disagree with Apple's choices, the official path to let them know is:

*Go to "Provide Pages Feedback" in the "Pages" menu*, describe what you think/want/wish.
Then, cross your fingers, and wait for iWork'09 😉

Yvan KOENIG (from FRANCE mardi 15 janvier 2008 18:49:59)

Hello


I was only responding upon +"you could go to "tools" and click on "envelope" to print the address directly onto an envelope"+

Is it too difficult to copy paste the address from the letter into one of the numerous envelope template delivered with Pages ?

Yvan KOENIG (from FRANCE mardi 15 janvier 2008 19:23:26)

It would indeed be handy to have some script or automator action that would do this. I sometimes create and print a couple of dozen different letters and accompanying envelopes in a day, and it is much easier to generate the accompanying envelopes in Word than it is in Pages.

Nevertheless, one of my New Year's resolutions is to give iWork '08 a try am stop using MS Office.

Hello

You are using Pages
You are using 10.5.1

It would perhaps be time to use the new feature available in Automator: record actions.
I assumes that it would be quite a clone of the macros which where available in AppleWoks before MacOS X.

Yvan KOENIG (from FRANCE samedi 19 janvier 2008 17:40:4)

I would suggest downloading the EasyEnvelopes widget and putting it on your dashboard. This widget will automatically find an entry in your address book from a search fragment in its dialog box. When you click on the stamp icon on the widget it prints an envelope from your printer. You enter your standard return address.

This works very easily for one off envelopes from word processors and you don't have to leave the application since it is a widget.

For serious mail merging the earlier suggestions are more appropriate.

Good luck.

Hello

Here is a soluce for those which need to print addresses from time to time.
The source address may be the one already typed in the letter iself or stored in a row of a spreadsheet.

I tested the script using a modified duplicate of a template delivered by Apple.

(*
Copy the script in the clipboard
Paste in a blank window of Script Editor
Save it as an application : paste2envelope.app

Move the newly created application into the folder:
<startup Volume>:Users:<yourAccount>:Library:Scripts:Applications:Pages:

Now, enter your Pages document.

Select the address to use. Copy to clipboard.

Go to

menu Scripts > paste2envelope
The script will open the template "myOwnEnvelope.template"
then it paste the destination address.

At the beginning was a duplicate of an
envelope template delivered by Apple
edited to install the sender's address
saved as a template in the
"Library:Application Support:iWork:Pages:Templates:My templates:" folder

The source address may looks like:

KOENIG Yvan
4 avenue du Stade
06220 VALLAURIS
(FRANCE)

or

KOENIG Yvan
(tab) 4 avenue du Stade
(tab) 06220 VALLAURIS
(tab) (FRANCE)

or

KOENIG Yvan (tab) 4 avenue du Stade (tab) 06220 VALLAURIS (tab) (FRANCE)

Yvan KOENIG
26 janvier 2008
*)

--(SCRIPT paste2envelope.app]
property theApp : "Pages"

set tt to the clipboard as Unicode text
if tt contains tab then
set AppleScript's text item delimiters to tab
set l to text items of tt
if tt contains return then
set AppleScript's text item delimiters to ""
set the clipboard to l as text
else
set AppleScript's text item delimiters to return
set the clipboard to l as text
set AppleScript's text item delimiters to ""
end if
end if

set p2myEnvelope to (path to application support from user domain as Unicode text) & "iWork:Pages:Templates:My templates:myOwnEnvelope.template"

tell application theApp
open file p2myEnvelope
activate
set {xH, yH, xB, yB} to bounds of window 1
tell application "System Events" to tell application process theApp
click at {xH, yH}
keystroke "av" using {command down} (* Select All + Paste *)
end tell
end tell -- theApp
--[/SCRIPT]

Yvan KOENIG (from FRANCE samedi 26 janvier 2008 22:19:12)

Here's a script I just created that works similar to the Word version except that it creates the envelope as a new document instead of appending it to the beginning of the existing document. Select the address in the Pages letter and it will be pasted into the envelope template. As written, the script uses my envelope template which is named _Envelope. You can substitute your own template, just replace the name in the script. It is essential, though, that you save the envelope template with the cursor at the insertion point for the address.

I suppose this could also be modified to work with an envelope document.

*
Copy the script in the clipboard
Paste it into a blank window of Script Editor
Save it as an application : envelope.app

Move the newly created application into the folder:
<startup Volume>:Users:<yourAccount>:Library:Scripts:Applications:Pages:

Now, enter your Pages document.

Select the address to use.

Go to

menu Scripts >Envelope


--(SCRIPT]
tell application "Pages"

set add to selection
set the clipboard to add as text
make new document with properties {template name:("_Envelope")}
set addon to add as text
set the selection to addon

end tell
[/SCRIPT]


This happens to be my first published Applescript. I'm used to coding in VBA and this took a little more work than I would have liked. Perhaps more advanced scripters can make it a little more elegant.

Good luck,

Terry

Message was edited by: Terry Keelan1

Message was edited by: Terry Keelan1