Av8tordude
Well-known Member
- Joined
- Oct 13, 2007
- Messages
- 1,074
- Office Version
- 2019
- Platform
- Windows
I'm using this code to insert an image to my sheet from my local drive. However, I can't seem to rename the image. The third line is suppose to rename the image, but after the image is inserted, its not selected. Therefore the image is not being renamed. Can someone help.. Thank you
VBA Code:
Sub Macro1()
ActiveSheet.Shapes(Application.Caller).TopLeftCell.Select
ActiveSheet.Pictures.Insert ActiveCell.Comment.Text
Selection.Name = ActiveCell.Value
End Sub