Итак, это код, который я получил:
Sub Delete()
' Delete Macro
Range("C9:C58").Select
Selection.ClearContents
Range("C8").Select
ActiveSheet.ShowAllData
End Sub
Этот код запускается, когда я нажимаю на изображение в моем листе Excel. Заголовки на листе имеют предварительно примененный фильтр, поэтому мне нужно отобразить исходный лист. Система показывает ошибку времени выполнения 1004, когда я нажимаю на изображение без данных в столбце C8.
Я хочу отобразить ошибку MsgBox с моим сообщением.
Я попытался сделать следующее, но это не решило мою проблему:
On Error GoTo ErrMsg
Exit Sub
ErrMsg:
MsgBox ("No Data to Delete !"), , "Delete"
Пожалуйста, помогите!