Hi Tom. I have hard coded the top properties for my shapes, this is the
problem. I have to get my programme to determine the new users monitor size
and set new top properties for my shapes. I am not sure on how to get the new
users monitor size and how to give new top values to the shapes.
--
SS


"Tom Ogilvy" wrote:

> Shapes have a Height and Width property.
>
> for each shp in ActiceSheet.Shapes
> with shp
> .Height = 1.25 * .Height
> .Width = 1.37 * .Width
> End With
> Next
>
> these are also scalewidth and scaleheight properties
>
> Also look at the LockAspectRatio property.
>
> See help for details.
>
> --
> Regards,
> Tom Ogilvy
>
>
> "StevenS" <StevenS@discussions.microsoft.com> wrote in message
> news:87B90223-30FB-45A6-A237-DFBD8527DE88@microsoft.com...
> > I have a similar problem to Dennis. I am trying to get VB to set a scal
> for
> > cells & shapes to suit the current users screen size. I run VB code to
> change
> > the sizing of the shapes for the size shed the customer wants. I'm not
> sure
> > of the code I need to do this.
> >
> > Please help
> > --
> > SS
>
>
>