Create a Word Document with VBA

SamDsouza · #16 03-08-2020, 11:35 PM

Thank you sir, I did put in right place but realised very late for the below syntax

Quote:

Const wdHeaderFooterPrimary As Long = 1

But now i get Error as User Type Not defined marked in bold below when implementing the same to insert the image

Code:

Dim oSec As Section
Dim oHeaderFooter As HeaderFooter
Dim oLogo As inlineshape
        
Set oSec =  ActiveDocument.Sections
        Set oHeaderFooter = oSec.Headers(wdHeaderFooterPrimary)
        With oHeaderFooter.Range
            .ParagraphFormat.Alignment = wdAlignParagraphRight
                   Set oLogo = .InlineShapes.AddPicture(Filename:="C:\FORMS\1-Seal.jpg", LinkToFile:=False, SaveWithDocument:=True)
        
        End With
        With oLogo
            .Height = 75
            .Width = 100
        End With

SamD

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How do I create an index of every word in a document?	jbengal	Word	5	11-23-2022 02:17 PM
Can I create word wizards with Word 2016 to automate document creation?	OkiDoki	Word	4	09-30-2016 11:41 AM
Word 2010 - How to create a fillable document from a boilerplate document	sheaters	Word	2	05-04-2016 01:57 PM
How to create a special TOC in word document?	gn4619	Word VBA	5	04-29-2015 04:25 PM
How to identify whether Word 2007 was used to create a document saved as Word 2003	noviceatwork	Word	0	03-08-2012 06:40 AM