Rename a VBA imported picture

nsv · #1 12-12-2017, 03:26 AM

I need to import a bunch of pictures to a Word document.
Such pictures are given a name starting with 'Picture 1' and adding up as more are imported. I need, however, to be able to identify each picture for possible deletion later, so I therefore want to give them a name immediately when importing them.
So far this code works:

Code:

Dim ImPath1 As String
ImPath1 = "C:\Users\nivo\Pictures\Icons\Water_icon_square.jpg"
ActiveDocument.Shapes.AddPicture FileName:=ImPath1, LinkToFile:=False, SaveWithDocument:=True, _
Left:=-15, Top:=275, Anchor:=Selection.Range, Width:=40, Height:=40

but I need to add something like:

Code:

, Name:="Water".

which unfortunately does not work.

Anyone has a hint?

best regards, NSV

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Picture content control -> insert picture -> empty?	Jaymond Flurrie	Word	3	07-13-2016 07:00 AM
Convert an imported chart (picture) to an editable drawing object	fishguy	Drawing and Graphics	1	05-23-2016 02:23 AM
Rename Files	gsrikanth	Excel Programming	3	05-14-2012 03:03 AM
Move Picture by picture name, rename picture by picture name	CatMan	PowerPoint	2	04-18-2012 12:21 PM
Powerpoint automatically changing picture size when adding a picture (2010)	One_Life	PowerPoint	7	01-20-2012 06:57 AM