Предупреждающее сообщение перед запуском макроса (Excel)

Question

Я пытаюсь добавить предупреждающее сообщение при запуске макроса в Excel.

Предупреждающее сообщение должно предоставить возможность «отменить» перед запуском приведенного ниже кода для очистки ячеек.

При попытке добавить окно с сообщением ниже, где пользователю предлагается активировать макрос с ленты, я не могу заставить его работать без ошибок.

Лист заблокирован, поэтому толькоНезамкнутые ячейки должны быть более четкими.

Может ли кто-нибудь помочь сделать включение этого двухэтапного процесса?

Sub Glazing_ClearContents(rib As IRibbonControl)
Dim rng As Range
Dim C As Variant
Set rng = Sheets("Glazing_Systems").Range("C12:I42")
    For Each C In rng
        If C.Locked = False Then
            C.ClearContents
        Else
        End If
Next C
End Sub

Answer 1

Option Explicit


Sub test()

    Dim Continue As String

    Continue = MsgBox("Are you sure you want to clear cells?", vbCritical + vbYesNo, "Attention")

    If Continue = vbYes Then
    Else
    End If

End Sub

Answer 2

Я не обнаружил никаких проблем с использованием следующего кода, когда спрашивал, хочет ли пользователь использовать макрос

question = "Are you sure you want to run this Macro?"
If MsgBox(question, vbYesNo + vbQuestion) = vbYes Then
''''' Place your code to be executed if you clicked yes
else
'''''' Place your code to be executed if you clicked no
end if

Надеюсь, это поможет вам!