Insert an Image into Word document in a specified location?? Word/VBA

[dragon-goddess1990]

Word 2010

Scenario 1) I would like to be able to get the user to browse for an image (electronic signature) - I dont know how to create a browse control to do this

Scenario 2) I would like to be able to insert a header image into a document in a specific location - I dont know how to reference a specific location / coordinates in the document (bookmark isnt ideal as the header image needs to sit perfect and fill the width etc)

Please help

Thanks

 

[dragon-goddess1990]

What Class/Library does .Name belong to that you use in the code please?

 

[Macropod]

In this case, it belongs to Application.Dialogs(wdDialogInsertPicture). See: Built-in Dialog Box Argument Lists (Word)

 

[dragon-goddess1990]

Thanks for the reply but I found a way

I split the code. First part is browse button to retrieve file, textbox1.value = strpic.

Secpnd button tells it to put strpic into bookmark

 

[kaypat]

You may have already found a solution but here is a bit of code that will do what you need. The only thing is that you will need to add a path to your image where i have highlighted.

Sub Signature()
Application.ScreenUpdating = False
Dim Rng As Range, Shp As Shape, StrImg As String
StrImg = "C:Add path here"
Set Rng = Selection.Range
Rng.Collapse
Set Shp = ActiveDocument.InlineShapes.AddPicture(FileName:=StrImg, _
SaveWithDocument:=True, Range:=Rng).ConvertToShape
With Shp
.WrapFormat.Type = wdWrapBehind
End With
Set Rng = Nothing: Set Shp = Nothing
Application.ScreenUpdating = True
End Sub

Let me know how it works for you.

Word 2010

Scenario 1) I would like to be able to get the user to browse for an image (electronic signature) - I dont know how to create a browse control to do this

Scenario 2) I would like to be able to insert a header image into a document in a specific location - I dont know how to reference a specific location / coordinates in the document (bookmark isnt ideal as the header image needs to sit perfect and fill the width etc)

Please help

Thanks