Moving Objects in a Worksheet
Scratch that! :) Figured out a way to get done what I needed.
Utilized the following:
ActiveSheet.Shapes("Oval 1").Top = Range("E14").Top <----moves
object to row 14
ActiveSheet.Shapes("Oval 1").Select
Selection.ShapeRange.IncrementTop -5 <---moves object slightly up
(5 points)
ActiveSheet.Shapes("Oval 1").Left = Range("E14").Left <---- moves
object to column E
Please let me know if this is incorrect or could be improved! Thanks!
|