Insert image from URL via bookmark in Microsoft Word

Question

0.00/5 (No votes)

See more:

Ok this might not be as much a programming question as just a how the hell do I do it question.

I have a image URL contained in my sql database. I create a bookmark for that column in the word document.(this works fine)

Now I want to use the image URL that is passed from the database to insert an image.

I have tried hyperlink(DOES NOT WORK and DOES NOT DISPLAY IMAGE) I have tried Quick Parts - IncludePicture (DOES NOT WORK).

I have been Googleing my ass of for the past week and have not found anything that works.

ANY HELP PLEASE???????????

Ok let me simplify this. I want to insert a image using an URL. You can do this in alot of different ways I know.

For instance using Quick Parts and the selecting IncludePicture you would the past the URL of the picture and BAM image inserted.

Now I want to do exactly that with one exception. The URL is a microsoft word bookmark that I get from my database. For some reason this does not want to work. I have also checked the bookmark data and it is correct and yes it is a valid URL because if I copy and paste it from the database in the way I described above it works.

So is there any other way to do this?

I have been supplied with word-vba code that looks something like this.

VB

Sub Insert_picture()

Dim Google As String

<pre>Sub Insert_picture()

Dim Google As String

Google = "http://maps.googleapis.com/maps/api/staticmap?center=(-26.2041028, 28.047305100000017)&zoom=17&size=500x500&markers=size:large%7Ccolor:red|(-26.2041028, 28.047305100000017)&sensor=false&region=ZA"

ActiveDocument.Bookmarks("MAPURL").Range.InlineShapes.AddPicture Google, True, True

End Sub

So now my question(using this code). Is there a way to set the Google string to the MAPURL bookmark?
I need to dynamically generate the image for different locations. (Different location for each document that is greated)
Hope this helps make what I am looking for a bit clearer

Again any help will be greatly appreciated.

Posted 20-Jun-13 19:15pm

BulletVictim

Updated 23-Jun-13 21:03pm

v5

Add a Solution

2 solutions

Solution 2

Here I check for the bookmark in the database and if it contains the mapurl bookmark it then takes the placeholder bookmark on the document and sets its text to null and the inserts the image at the bottom of the document(where the bookmark is located)

VB

If MyBookMarks.Item(bookmark).Name = "mapurl" Then

                    MyBookMarks.Item(bookmark).Range.Text = ""

                    Dim oRange As Object = MyBookMarks.Item(bookmark).Range
                    Dim saveWithDocument As Object = True
                    Dim missing As Object = Type.Missing

                    appWord.Application.Selection.InlineShapes.AddPicture(cmd.Columns.Item(bookmark).ToString(), missing, saveWithDocument, oRange)
                Else

Posted 24-Jun-13 0:42am

BulletVictim

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

**Zoltán Zörgő** · Accepted Answer · 2013-06-23T20:53:00

Solution 1

Check this code:

VB

Sub Insert_picture()

Dim Google As String

ActiveDocument.Bookmarks("MAPURL").Select
Google = Selection.Text

ActiveDocument.Bookmarks("MAPURL").Range.InlineShapes.AddPicture Google, True, True

End Sub

Be aware to have the placeholder bookmark only covering the url, and nothing else.

Posted 23-Jun-13 20:53pm

Zoltán Zörgő

Updated 23-Jun-13 22:57pm

v2

Comments

BulletVictim 24-Jun-13 3:01am

That is just the commenting of the site that did removed the http protocol.

Zoltán Zörgő 24-Jun-13 4:00am

I tried it, and it is working for me in Word 2010.

BulletVictim 24-Jun-13 4:06am

Yes I know it works if you use a static URL. I need to use the bookmark to set the URL. So basically I need to select the text from my Bookmark and set the Google string to that text

Zoltán Zörgő 24-Jun-13 4:28am

How exactly? A bookmark has no value.

BulletVictim 24-Jun-13 4:15am

I have tried doing it like this. Google = ActiveDocument.Bookmarks("MAPURL").Range.Text
If i try to implement it I get a Run-time error '5152': This is not a valid file name.
Try one of the following:
*Check the path to make sure it was typed correctly.
*Select a file from the list of files and folders.

Zoltán Zörgő 24-Jun-13 4:31am

As I know, a bookmark is not on a text range. It is a field, that has no length, thus it can't have any value, just it's name.

Zoltán Zörgő 24-Jun-13 4:35am

If it's name is MAPURL, can't be the url at the same time. Can it? And the url is too long to be a bookmark. I suggest you use legacy text form field - it has a name and a value.

BulletVictim 24-Jun-13 4:39am

It actually works as a normal placeholder bookmark. It displays the complete text in word.
So it has to be possible to get the text value from it.
It should be able to be the url at the same time since I get the bookmarks value from my database

Zoltán Zörgő 24-Jun-13 4:49am

Let me check that approach!

Zoltán Zörgő 24-Jun-13 4:58am

See my update. It is working for me.
I got the same error as you, but than I have noticed, that the bookmark was covering other characters too, not just the url.

BulletVictim 24-Jun-13 5:09am

Am I missing something? Because I took your update and it still gives me the same error. Does It make a difference if I am working with a .doc document in word 2007?

Zoltán Zörgő 24-Jun-13 5:16am

Well, I haven't saved it yet, mine is in memory. After getting the selection, what do you have exactly in the google variable?

BulletVictim 24-Jun-13 4:35am

I have been looking around and it seems possible to do this. But it does not seam to want to work with the code. perhaps because I am using a placeholder Bookmark

BulletVictim 24-Jun-13 6:39am

Thank you so much for all your help. It turned out that the bookmark did not populate in word vba for some weird reason because the document is contained in the sql database and did not refference it for some reason.
Because of this I was given the go ahead to do this in the code generation on the application side( So much easier and faster to do).
I am going to mark your solution as the correct one and just put the code that finally worked here incase somebody ever need to do something like this again.