can anybody tell me .why it is not working .any help would be greately appreciated.Bold line is not working.Kindly find the attachment also.it becomes red i am using ms office 2003.
kindly help me.
here is the code what i have written.

Sub AddTopHeader()
Selection.TypeParagraph
Selection.TypeParagraph
   With Selection
       .Font.Name = "Arial"
       .Font.Size = 10
       .Font.Bold = True
       .TypeText = "AL ARABI FACTORY FOR STEEL WORKS"
    End With
    [b]selection.InlineShapes.AddPicture.filename : = _
    "C:\Documents and Settings\Administrator.IT\Desktop\999\Steelworks\firmSignature.jpg", LinkToFile : =False _[/b]    SaveWithDocument=trueEnd Sub

Recommended Answers

All 3 Replies

what you mean by not working macro unable to insert the picture file? or what?

what you mean by not working macro unable to insert the picture file? or what?

Unable to insert a picture in ms word.Kindly help me any help would
be greately appreciated.

make sure that the path is valid, and the pic file is on the path..

selection.InlineShapes.AddPicture.filename : = _
    "C:\Documents and Settings\Administrator.IT\Desktop\999\Steelworks\firmSignature.jpg", LinkToFile :=False,    SaveWithDocument :=true
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.