How to zoom or magnify selected cells in Excel? 

As we all know, Excel has a Zoom feature to help us to increase the size of the cell value in the whole worksheet. But, sometimes, we just need to zoom or magnify only the selected cells. Are there any good ideas for us to enlarge the selected cells only in a worksheet?

Zoom or magnify the selected cell with VBA code

Zoom or magnify the selected cell with VBA code

May be there in no direct way for us to magnify the selected cells in Excel, but, here, I can introduce a VBA code to deal with this job as a workaround. Please do as follows:

1. Right click the sheet tab that you want to enlarge the selected cells automatically, and then choose View Code from the context menu, in the opened Microsoft Visual Basic for applications window, copy and paste the following code into the blank Module:

VBA code: Zoom or magnify the selected cells:

Private Sub worksheet_selectionchange(ByVal Target As Range)
'Updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xShape As Variant
    Set xRg = Target.Areas(1)
    For Each xShape In ActiveSheet.Pictures
        If xShape.Name = "zoom_cells" Then
            xShape.Delete
        End If
    Next
    If Application.WorksheetFunction.CountBlank(xRg) = xRg.Count Then Exit Sub
    Application.ScreenUpdating = False
    xRg.CopyPicture appearance:=xlScreen, Format:=xlPicture
    Application.ActiveSheet.Pictures.Paste.Select
    With Selection
        .Name = "zoom_cells"
        With .ShapeRange
            .ScaleWidth 1.5, msoFalse, msoScaleFromTopLeft
            .ScaleHeight 1.5, msoFalse, msoScaleFromTopLeft
            With .Fill
                .ForeColor.SchemeColor = 44
                .Visible = msoTrue
                .Solid
                .Transparency = 0
            End With
        End With
    End With
    xRg.Select
    Application.ScreenUpdating = True
    Set xRg = Nothing
End Sub

2. Then save and close this code window, now, when you select or click some data cells, the cells will be magnified as a picture automatically, see screenshot:

Note: The selected cells will be changed back to original size after selecting other cells.