Selection.ShapeRange.IncrementLeft error

  • Thread starter Thread starter Anil Khemchandani
  • Start date Start date
A

Anil Khemchandani

Hello Sir/Madam,

I have created an excel app that inserts an .bmp image. I
would like to select it and shift it a little to the left
so that it aligns properly while viewing on screen and on
paper. Here is lies my problem - I am selecting the image
and then use Selection.ShapeRange.IncrementLeft #6. This
works the first time I run it but the second time I get
the following error -

run time error '438' - Object doesn't support this
property or method

Is there a possible workaround this??

Any help on this would be great.

Thanks.

Anil
 
Hi Anil,

If you know or can determine the specific position where you want to be
located, I'd suggest setting the Top and Left properties of the Shape object
directly. For example:

With Sheet1.Shapes(1)
.Top = 10
.Left = 10
End With

You can also increment the position of the Shape using these properties in
the following manner:

With Sheet1.Shapes(1)
.Top = .Top + 10
.Left = .Left + 10
End With

--
Rob Bovey, MCSE, MCSD, Excel MVP
Application Professionals
http://www.appspro.com/

* Please post all replies to this newsgroup *
* I delete all unsolicited e-mail responses *
 
Back
Top