iSelectionAddress = Selection.Address
iSelectionAddress = Excel.Selection.Address
iSelectionAddress = Application.Selection.Address
iSelectionAddress = ActiveWindow.Selection.Address
MsgBox iSelectionAddress
Если в момент исполнения будет выделен графический об'ект, то Вы получите ошибку, которую можно избежать, если использовать соответствующую проверку или следующий вариант.
iSelectionAddress = ActiveWindow.RangeSelection.Address
MsgBox iSelectionAddress
Отличие RangeSelection от Selection заключается в том, что при выделенных графических об'ектах это свойство возвращает диапазон, который был выделен перед выделением графического об'екта.