"Doug Robbins - Word MVP" wrote:
[Quoted Text] > The following can be used as a work around for that problem. > > Macro to overcome the problem with propagation of mail merge field fields > with a label type mail merge when using a Tablet PC and some other Computers > that have Tablet PC Functionality available: > > Sub MailMergePropagateLabel() > > Dim atable As Table > > Dim i As Long, j As Long > > Dim source As Cell, target As Cell > > Dim myrange As Range > > Set atable = ActiveDocument.Tables(1) > > Set source = atable.Cell(1, 1) > > Set myrange = source.Range > > myrange.Collapse wdCollapseStart > > ActiveDocument.Fields.Add Range:=myrange, Text:="NEXT", _ > > PreserveFormatting:=False > > source.Range.Copy > > For j = 2 To atable.Columns.Count > > Set target = atable.Cell(1, j) > > If target.Range.Fields.Count > 0 Then > > target.Range.Paste > > End If > > Next j > > For i = 2 To atable.Rows.Count > > For j = 1 To atable.Columns.Count > > Set target = atable.Cell(i, j) > > If target.Range.Fields.Count > 0 Then > > target.Range.Paste > > End If > > Next j > > Next i > > atable.Cell(1, 1).Range.Fields(1).Delete > > End Sub > > > > It is suggested that you put this code into a template that you save in the > Word Startup folder so that it becomes an add-in and will be available > whenever you need it. As the macro has the same name as the Word Command > that is supposed to do the job, this macro will run when the Update Labels > button is used when setting up the mail merge label main document. > > > -- > Hope this helps. > > Please reply to the newsgroup unless you wish to avail yourself of my > services on a paid consulting basis. > > Doug Robbins - Word MVP > > "pete424" <pete424[ at ]discussions.microsoft.com> wrote in message > news:9DD2AE46-0B10-43A1-9D2F-404E4C636493[ at ]microsoft.com... > > This is a problem I am having on two separate computers. Both of these > > computers have recently been upgraded to Vista Business. One was a clean > > install the other was an upgrade over XP. Both machines have Office > > Enterprise 2007 installed. I have many Excel lists of addresses that I > > use > > for Real Estate mailings. Since I upgraded when I do the mail merge > > wizard > > in Word everything works fine until I get to the update all to the address > > block point and all it updates are the top 3 labels on a sheet of 30 Avery > > 5130. When I am at the mail merge recipients window they are all there > > and > > they all have check marks by them. These same Excel sheets work fine on > > any > > of my other machines that are still running XP. As far as I know both of > > these machines are fully updated. Any suggestions? > > > I appreciate the response but to be perfectly honest I have no experience with macros. If you could give me a short, step by step it would sure be helpful.
|