-
Website
http://www.tech-recipes.com/ -
Original page
http://www.tech-recipes.com/rx/1955/making_labels_with_openoffice_org_templates/ -
Subscribe
All Comments -
Community
-
Top Commenters
-
davak
83 comments · 1 points
-
Web Design
3 comments · 1 points
-
danishbacker
9 comments · 1 points
-
flexinfo
11 comments · 1 points
-
Tonychelle
4 comments · 1 points
-
-
Popular Threads
-
Symfony: Drop Down List Box Without Submit Button
18 hours ago · 1 comment
-
PowerPoint 2010: How To Convert a Presentation to Video (WMV format)
1 week ago · 1 comment
-
Windows Live Mail: Automatically Spell Check All Email Before Sending
1 week ago · 2 comments
-
Firefox: How to Make Google Reader the Default RSS Reader for Subscribing to Feeds
1 week ago · 1 comment
-
Facebook: How To Get Only Status Updates on Your FB Home Page
1 month ago · 4 comments
-
Symfony: Drop Down List Box Without Submit Button
I appreciate your help...
Eric,
Your problem with the spreadsheet itself needs a different solution though, I knocked up an example macro that should reformat the content (don't run this without saving a copy!) the way you need it, AS LONG AS every name and address really is 3 lines long. It assumes the data is in column A of sheet1.
sub RealignAddresses
rem ----------------------------------------------------------------------
rem define variables
Dim Doc As Object
Dim Sheet As Object
Dim Cell As Object
Doc = thisComponent
Sheet = Doc.Sheets(0)
dim namerow as integer
dim address1 as integer
dim address2 as integer
dim oldvalue as string
destinationrow=0
for f=0 to 800 step 3
namerow=f
address1=f+1
address2=f+2
rem--------name-----------------
SourceCell = Sheet.getCellByPosition(0, namerow)
oldvalue = SourceCell.String
DestinationCell = Sheet.getCellByPosition(0,destinationrow)
DestinationCell.String = oldvalue
rem--------address1-----------------
SourceCell = Sheet.getCellByPosition(0,address1)
oldvalue = SourceCell.String
DestinationCell = Sheet.getCellByPosition(1,destinationrow)
DestinationCell.String = oldvalue
rem--------address2-----------------
SourceCell = Sheet.getCellByPosition(0,address2)
oldvalue = SourceCell.String
DestinationCell = Sheet.getCellByPosition(2, destinationrow)
DestinationCell.String = oldvalue
destinationrow = destinationrow+1
next f
end sub
In Writer the Avery label default lets say for 5962 defines the page size as "User" measured 8.55" x 10.18". My Canon Imageclass sounds the alarm recognizing this is not going to work when I am printing onto an 8" x 11" page. Logical solution - change to page size to Letter - did it - results - entire column (2 of 2) drops off the page leaving only 1 of the 2 columns to print.
WorldLabel.com is a great resource place to learn the dimensions of your particular label. I really hope OpenOffice.org realizes this is a problem and issues a fix right away, this manual manipulation to get the label size just right is a big pain in the you know what.
I am finding that once I close and open the same document later (lets say the next day or later that same day) to print the merged data, it has made all 14 labels of the first page the same thing where as before label 1 - 14 contained exclusive merged data (the goal). I am very careful not to click "Yes" when asked upon opening the document to "Update All Links" as I understand this will cause the same merged data to print on an entire page of labels.
Any fixes for this coming Open office?