Mac

macropod · #15 08-17-2018, 06:07 AM

In that case, you could use:

Code:

Sub Demo()
Application.ScreenUpdating = False
With ActiveDocument.Range
  With .Find
    .ClearFormatting
    .Replacement.ClearFormatting
    .Forward = True
    .Wrap = wdFindContinue
    .Text = "^g^g^g"
    .Replacement.Text = "^&^l^l"
    .Execute Replace:=wdReplaceAll
    .Text = "^g"
    .Replacement.Text = "^&^t"
    .Execute Replace:=wdReplaceAll
    .Text = "^t^l"
    .Replacement.Text = "^l"
    .Execute Replace:=wdReplaceAll
  End With
End With
Application.ScreenUpdating = True
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Insert Pictures - Via MACRO	sahrens1	Word VBA	1	07-02-2017 07:16 AM
How do I insert pictures directly into picture boxes by clicking the box instead of using INSERT>PIC	Bree	Word	1	06-24-2016 10:32 PM
Macro to insert multiple pictures with adjustable column size	nando88	Word VBA	6	05-09-2016 11:56 PM
Insert an article with pictures into a table cell	skatiemcb	Word Tables	2	01-24-2015 08:18 AM
Macro to insert multiple pictures to word to a specific size and text wrap	mescaL	Word VBA	3	11-03-2014 10:51 PM