VBA körfel "1004"

Hej,

Har råkat ut för ett 1004 fel i min VBA kod, får meddelandet: Körfel nr ´1004´: Program- eller objektdefinierat fel för följande kod:

Sub Placering1020()


Dim rng As Range

Set rng = ActiveSheet.Range("A106")

    With ActiveSheet.OLEObjects("k1020")
        .Top = rng.Top
        .Left = rng.Left
        .Width = rng.Width
        .Height = rng.RowHeight
        
    End With
    
    Rows(106).EntireRow.AutoFit
   
    
End Sub

Det konstiga är att koden har fungerat tidigare men är jag öppnade excelarket idag hittade excel ett fel och återskapar därefter så mycket som möjligt och detta problem var resultatet.

Någon som ser något uppenbart fel?

Koden är menad att uppdatera placeringen för en kommandoknapp till cell  men nu är knappen också borta, kanske värt att nämna.

Mycket tacksam för svar

/Robert