Rename a VBA imported picture

nsv · #1 12-13-2017, 01:07 PM

Thanks Paul, I will certainly give a try.

This Word VBA appears to be somehow less powerful than VBA for Excel, but that is probably because I am new to it.

NSV

nsv · #2 12-14-2017, 07:28 AM

OK Paul, that worked so that even I could understand it! - thanks again!

msdiniz · #3 09-26-2019, 08:21 PM

Hi, all.
Thanks, Paul, it functions.

But, I think there is a catch, at least on Office(Word) 365 USA and Brazil versions:

Shape gets a name Picture # (Picture 1, Picture 2, etc); if you try to add a "Tag", like

Code:

shpPicture.Name = shpPicture.Name & "_" & Format(Now(), "yyyymmdd") & imageTag

it will not work because of the space in Picture 1...
You have to remove the space, like:

Code:

shpPicture.Name = VBA.Replace(shpPicture.Name & "_" & Format(Now(), "yyyymmdd") & imageTag, " ", "")

PS 1: the Date and imageTag? To know what they are and safe delete or move in another occasion.
PS 2: Amazing thing, the index Array at the end, with no need of intermediate variables, thanks for teach it.

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