Visual Basic para Aplicaciones - Desactivar Grafico

Buenos días, tengo un problema VBA me da un error ,os cuento:
En una hoja creo un gráfico al entrar en ella, y tengo un boton para borrarlo pero lo que quiero es que se borre al salir de esa hoja por si no lo he borrado , por que si no al volver a entrar crea uno distinto ,
He intentado con el siguiente código por que si lo he borrado no puedo decirle que lo borre por que da error como tiene que ser, lo que intento es que la macro compruebe si esta activo, si esta activo lo borre y si no cambia de pagina pero me da error 438 " el objeto no admite esta propiedad o método"

Private Sub Worksheet_Deactivate()
If ActiveSheet.ChartObjects.Activate Is Nothing Then En esta linea error
Hoja1.Activate
Else
Call Módulo5.BorrarChart
End If
End Sub

Gracias

buenas tardes foreros, por si alguien lo necesita saber Elsa Matilde me lo ha resuelto perfecto y fácil

Private Sub Worksheet_Deactivate()
On Error Resume Next
Sheets("Gastos").ChartObjects(1).Delete
End Sub

os dejo su enlace por si tenéis alguna duda


https://www.youtube.com/c/ElsaMatilde

Saludos