Удалить только объекты PDF в Excel

У меня есть лист с двумя типами объектов: элементы управления формой и объект PDF. Я хочу создать макрос, который удалит только объект PDF, а не мои элементы управления формой.

В настоящее время у меня есть следующий код: ActiveSheet.DrawingObjects.Delete Однако это удаляет как мои элементы управления формой, так и мой объект PDF.

Как я могу настроить это, чтобы выборочно удалить объект PDF или удалить все объекты, кроме моего элемента управления формой.

Большое спасибо!

Для справки: код, который я использую для вставки своего объекта PDF, приведен ниже.

Public Sub insertFile()

    'Select the cell in which you want to place the attachment
    Range("B34").Select

    'Get file path
    fpath = Application.GetOpenFilename("All Files,*.*", Title:="Select file")
    If LCase(fpath) = "false" Then Exit Sub

    'Insert file
    ActiveSheet.OLEObjects.Add _
    filename:=fpath, _
    Link:=False, _
    DisplayAsIcon:=False

End Sub