LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 56
Default Move an object not using increment property

I am setting up an excel sheet that will locate certain drawing objects based
on check boxes or radio buttions. Right now I have a lot of code that checks
the current location of the object and then uses the IncrementLeft and
IncrementTop properties to move the object. Does anyone know a different way
to do this. I would like to just locate the object at a point based on the
radio button or check box rather that having to check where it currently is
and adjusting the IncrementLeft and IncrementTop properties. Here is the code
for one of the objects I am currently using:

If Range("D114").Value = 3 Then
ActiveSheet.Shapes("Vise").Select
Selection.ShapeRange.IncrementLeft -270
Selection.ShapeRange.IncrementTop -111
Selection.ShapeRange.Flip msoFlipHorizontal
Else
If Range("D114").Value = 2 Then
ActiveSheet.Shapes("Vise").Select
Selection.ShapeRange.IncrementLeft -189
Selection.ShapeRange.Flip msoFlipHorizontal
End If
End If

This is an object with only to location possibilities. This expression grows
larger exponentially with location possibilities and I would like to have one
simple expression for each location.

Thank you in advance for any help you can give me.
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
How do I access to property of chart object ? HP. Jung Charts and Charting in Excel 0 April 11th 07 02:36 PM
How to check if an object has a certain property? J Excel Programming 1 December 5th 04 11:58 AM
Page Object property Matt[_18_] Excel Programming 1 October 2nd 03 01:43 PM
Object doesn't support this property or method Rick Campbell Excel Programming 2 July 13th 03 11:53 PM


All times are GMT +1. The time now is 08:08 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"