Re: $$Excel-Macros$$ Address of Shapes

2013-11-19 Thread Sam Mathai Chacko
The property TopLeftCell in itself is of type range. The code above can be shorter. Sub test() Dim shp As Shape For Each shp In ActiveSheet.Shapes MsgBox shp.TopLeftCell.Address Next End Sub Regards, Sam Mathai Chacko On Tue, Nov 19, 2013 at 2:22 PM, Chandra Shekar < chandrashekarb@gmai

Re: $$Excel-Macros$$ Address of Shapes

2013-11-19 Thread Chandra Shekar
Hello, Thank you very much. Regards, Chandru On Mon, Nov 18, 2013 at 11:45 PM, ashish koul wrote: > Sub test() > Dim shp As Shape > > For Each shp In ActiveSheet.Shapes > MsgBox Cells(shp.TopLeftCell.Row, shp.TopLeftCell.Column).Address > Next > > > > End Sub > > > > On Mon, Nov 18, 2013

Re: $$Excel-Macros$$ Address of Shapes

2013-11-18 Thread ashish koul
Sub test() Dim shp As Shape For Each shp In ActiveSheet.Shapes MsgBox Cells(shp.TopLeftCell.Row, shp.TopLeftCell.Column).Address Next End Sub On Mon, Nov 18, 2013 at 1:38 PM, Chandra Shekar < chandrashekarb@gmail.com> wrote: > Hello, > > Is there anyway to get cell reference of shap

$$Excel-Macros$$ Address of Shapes

2013-11-18 Thread Chandra Shekar
Hello, Is there anyway to get cell reference of shapes please find sampe excel. Thanks in advance. Regards, Chandru -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ https://www.facebook.com/discuss