Centering spreadsheet

[xVikesh]

Hello

I've created a spreadsheet which is a debt advisor for students, I am just having a problem where when I use a different zoom ratio, the formatting messes up. For example, the image here

is when the zoom is at 70% and the image here

is when the zoom is at 100%.

The sheet at 70% has messed up the formatting so it looks very unprofessional and unusable. In addition to this, I created the sheet on a desktop computer but when I also open the file on my laptop screen it doesnt look correct as it is a smaller screen.

Are there anyways to fix these issues?

Thanks in advance

 

[RickXL]

Hi,

Have you tried the formatting option that "Moves and sizes with cells"?

You can do that through the Right-Click menu under "Size and Properties ...".

Here is a macro that I tried. It positions the picture (Picture 2) in a range of cells on Sheet3, in my case, and locks the aspect ratio and links it to the underlying cells.

Private Sub xx()
    Dim Shp As Shape
    With Sheet3
    Set Shp = .Shapes.Item("Picture 2")
        Shp.LockAspectRatio = msoTrue
        Shp.Top = .Range("H5:R21").Top
        Shp.Left = .Range("H5:R21").Left
        Shp.Width = .Range("H5:R21").Width
        Shp.Height = .Range("H5:R21").Height
        Shp.Placement = xlMoveAndSize
    End With
End Sub

You might want to think about protecting that worksheet. That would prevent users from moving the picture but allow the buttons to work.


Regards from Derbyshire.