Question : Automatically insert pictures/photos in Word

I have a a template that i insert photos from site into and wondered if there is a way to do this automatically by adding some sort of link?? any advice would be apreciated!! Regards

Answer : Automatically insert pictures/photos in Word

This is a Word VBA macro:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
Sub InsertPictures()
Dim strFolder As String
Dim strFile As String
Dim ilsh As InlineShape

strFolder = "C:\MyFolder"
strFile = Dir$(strFolder & "\*.jpg")
Do Until strFile = ""
    Set ilsh = ActiveDocument.InlineShapes.AddPicture(strFolder & "\" & strFile, False, True, ActiveDocument.Bookmarks("\EndOfDoc").Range)
    strFle = Dir$()
Loop
End Sub
Random Solutions  
 
programming4us programming4us