In my spreadsheet, the VBA is set to display & resize an image in D4, based on the values entered in A1 (w) and A2 (h), this is the code used:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Shapes("Group 10").Width = Target.Value / 10
End If
If...