Mensaje de error al guardar archivo desde macros

Estoy haciendo una macro donde tengo que guardar un archivo en un disco. El tema es que si el archivo ya existe me pide el OK para sobrescribirlo. Si le doy "ACEPTAR" todo bien pero si el usuario pone "NO" o "CANCELAR" la macro genera un error antes de llegar a la instrucción On Error
El código que uso es el siguiente:
If SaveStatus = "YES" Then
    With milibro
    .SaveAs filename, FileFormat:=FileFormatNum
    On Error GoTo Fin
    End With
End If
El tema es que no quiero anular la advertencia por me interesa el aviso de sobreescritura. Digo porque me había sugerido que ponga Application. DisplayAlerts = False
Gracias

{"Lat":-17.30868788677,"Lng":135.0}