Using the Duplicate Property to Store or Copy Formatting : ActiveDocument « Word « VBA / Excel / Access / Word






Using the Duplicate Property to Store or Copy Formatting

 
Sub dup()
    Dim Range1 As Range, Range2 As Range
    Set Range1 = Selection.Range.Duplicate
    Set Range2 = ActiveDocument.Bookmarks(1).Range
    Range2.Paragraphs(1).Range = Range2
End Sub

 








Related examples in the same category

1.Save document as
2.Defining a Named Range
3.Uppercase the first three words at the start of a document
4.Turning Off Track Changes
5.Replace all pairs of paragraph marks in the active document, you could search for ^p^p and replace it with ^p
6.Declare the HeaderFooter object variable myHeader and assign to it the primary header in the first section in the active document:
7.Checking to See if a Header or Footer Exists
8.Linking to the Header or Footer in the Previous Section
9.Creating a Different First-Page Header
10.Opening a New Window Containing an Open Document
11.Closing All Windows but the First for a Document
12.Active document paragraph
13.Save active document
14.Activate window by name