axmed.cm
04-25-2019, 08:50 AM
Dear All
Hope you are doing well.
When object/shape is inserted in spreadsheet it aoutomatically takes a name like "Object##", Is there a way to give specific name to taht object?
for example i loaded a file into the sheet as object I want to rename it as "Report1", kindly want to know if that's possible.
Sub LoadReport1()
Filename = Application.GetOpenFilename(Title:="Please choose a file to open", FileFilter:="Excel Files *.xls* (*.xls*),")
ActiveSheet.OLEObjects.Add(Filename:=Filename, Link:=False, DisplayAsIcon:=True, IconFileName:= _
"C:\Windows\Installer\{90150000-0011-0000-1000-0000000FF1CE}\xlicons.exe", _
IconIndex:=0, IconLabel:= _
Filename).Select
End Sub
Thank you
Hope you are doing well.
When object/shape is inserted in spreadsheet it aoutomatically takes a name like "Object##", Is there a way to give specific name to taht object?
for example i loaded a file into the sheet as object I want to rename it as "Report1", kindly want to know if that's possible.
Sub LoadReport1()
Filename = Application.GetOpenFilename(Title:="Please choose a file to open", FileFilter:="Excel Files *.xls* (*.xls*),")
ActiveSheet.OLEObjects.Add(Filename:=Filename, Link:=False, DisplayAsIcon:=True, IconFileName:= _
"C:\Windows\Installer\{90150000-0011-0000-1000-0000000FF1CE}\xlicons.exe", _
IconIndex:=0, IconLabel:= _
Filename).Select
End Sub
Thank you