Baseado no link abaixo, adicione a seguinte rotina no modulo VBE da aba e atribua a macro a cada imagem da aba, veja se o tamanho aumentar e diminuir ficam corretos, senão ajuste os parametros.
How To Enlarge Image When Click On It In Excel?
https://www.extendoffice.com/documents/ ... ge.html#a1

Sub Aumenta_Diminui()
Dim shp As Shape
    Dim big As Single, small As Single
    Dim shpDouH As Double, shpDouOriH As Double
    big = 3
    small = 1
    On Error Resume Next
    Set shp = ActiveSheet.Shapes(Application.Caller)
    With shp
        shpDouH = .Height
        .ScaleHeight 1, msoTrue, msoScaleFromTopLeft
        shpDouOriH = .Height
     
        If Round(shpDouH / shpDouOriH, 2) = big Then
            .ScaleHeight small, msoTrue, msoScaleFromTopLeft
            .ScaleWidth small, msoTrue, msoScaleFromTopLeft
            .ZOrder msoSendToBack
        Else
            .ScaleHeight big, msoTrue, msoScaleFromTopLeft
            .ScaleWidth big, msoTrue, msoScaleFromTopLeft
            .ZOrder msoBringToFront
        End If
    End With
End Sub

[]s

Mauro, bom dia.
Obrigado pela sua resposta. Ok funcionou, mas agora tenho outro problema, como faço para que ela volte ao normal, ou seja como era antes para poder abrir outra imagem.

Desculpe, agora deu certo, tanto aumenta como diminui, muito obrigado pela sua ajuda.