HJÆÆÆLP - jeg skal centrere billeder i en celle i Excel.

Jeg har lavet en macro (se kode nedenfor) der sletter eksisterende billeder og lægger nyt op i en celle (ved valg fra en rullemenu). Disse billeder er ikke af samme størrelser.

Jeg har desperat brug for at kunne centrere disse billeder uanset deres størrelse (hvorfor jeg ikke kan beregne hvor i cellen de præcist skal ligge)

Nogen der kan hjælpe med lidt kode? :)


Sub AddPic()

On Error Resume Next

Dim Rng As Range

Application.ScreenUpdating = False


Dim myshape As Shape
 
  For Each myshape In ActiveSheet.Shapes

    If myshape.Type = 11 Then myshape.Delete

    Next myshape
 
  Range("C1").Select
 
    ActiveSheet.Pictures.Insert(Range("E21").Value).Select
   
Selection.Height = 150
Range("E16").Select
On Error GoTo 0
End Sub