Results 1 to 7 of 7
  1. #1
    3 Star Lounger
    Join Date
    Aug 2006
    Location
    Gtr London, England
    Posts
    256
    Thanks
    2
    Thanked 0 Times in 0 Posts

    Label Setting (2003)

    Hi,

    Ive managed to put together an auto mail merge, which works fine, however when the labels are printed the data, which comes from an excel data source, is not being kept within the label resulting in the address being printed over two labels when it gets to the 5th or 6th address.

    I have customized a label with the correct height and width for the labels being used but word does not seem to keep the cutomize label and defaults back to Avery Standard.

    Any ideas ???

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Label Setting (2003)

    Select a row in the table in your merge document (the document with the mailmerge fields).
    Select Table | Table Properties...
    Activate the Row tab.
    Specify the Row Height, and make sure that it is set to Exactly.
    Repeat for the other rows.

  3. #3
    3 Star Lounger
    Join Date
    Aug 2006
    Location
    Gtr London, England
    Posts
    256
    Thanks
    2
    Thanked 0 Times in 0 Posts

    Re: Label Setting (2003)

    Hi Hans,

    Thanks for that . The only thing now is that I need to make sure that everytime the macro is run that the row height settings are reset.

    Ive recorded a macro to see the vba code but I need it to loop through every address label. Ive had a go at the loop statement below, but unfortunately it doesnt work.

    Do While Selection.Rows.Height < CentimetersToPoints(3.75)
    .SelectRow
    .Rows.HeightRule = wdRowHeightExactly
    .Rows.Height = CentimetersToPoints(3.75)
    Loop

    Do you have any suggestions as to where I might be going wrong?

    Cheers.
    Lee

  4. #4
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Label Setting (2003)

    Try this:

    With ActiveDocument.Tables(1).Rows
    .HeightRule = wdRowHeightExactly
    .Height = CentimetersToPoints(3.75)
    End With

  5. #5
    3 Star Lounger
    Join Date
    Aug 2006
    Location
    Gtr London, England
    Posts
    256
    Thanks
    2
    Thanked 0 Times in 0 Posts

    Re: Label Setting (2003)

    Great, thanks Hans.

    Sorry for the delay in replying, its one of those days !!

    Is there a way to display 14 labels to the page as oppose the 12 that seems to be the default ?

    Cheers.
    Lee

  6. #6
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Label Setting (2003)

    Do you have self-adhesive label sheets with 2 by 7 labels? If so, they probably have a type number that you can use to specify the label layout.
    If you want to set it yourself, you must add another row with 2 labels at the end of the table (it's easiest to copy the last row, then paste it immediately below the table.
    To make the expanded table fit on the page, you must do one of the following: either decrease the top and bottom margins in File | Page Setup..., or decrease the height of the rows of the table.

  7. #7
    3 Star Lounger
    Join Date
    Aug 2006
    Location
    Gtr London, England
    Posts
    256
    Thanks
    2
    Thanked 0 Times in 0 Posts

    Re: Label Setting (2003)

    Hi Hans,

    I've, at last, managed to come back to this project, very busy week last week.

    That works fine. Thanks for your advice, much appreciated.

    Best Regards.
    Lee

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •