I would like to automate the following task (assign/attach to a toolbar):
In slide mode...
Insert / Picture / From file
select picture, copy filename, and insert
select picture (its selected by default after inserting), go to Format / picture / Web and enter the original name of the picture file.
I want to do this so after I insert several pictures, I can list them by file name with the "Select Multiple Objects" tool.
I tried the macro recorder but the only thing I get is >
ActiveWindow.Selection.SlideRange.Shapes.AddPictur e(FileName:="P:My DocumentsMy Picturesworkhard.gif", LinkToFile:=msoFalse, SaveWithDocument:=msoTrue, Left:=318, Top:=228, Width:=85, Height:=85).Select
.Fill.Transparency = 0#
.AlternativeText = "workhard.gif"
Can anyone help me with the code? Thank you