Member Avatar for firoz.raj

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
  • 2 Contributors
  • 3 Replies
  • 88 Views
  • 1 Day Discussion Span
  • Latest Post Latest Post by cguan_77
Member Avatar for cguan_77

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

Member Avatar for firoz.raj

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.

Member Avatar for cguan_77

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.