Clear button, add warning dialogue box that asks: Are you sure you want to clear?

Hello!

How do I add a feature to my function button that clears away data to submit a warning to the user before it clears any data?

It can say something like:
"Are you sure you want to clear all Inventory data?"
With an option, "Yes" and "Cancel"

Here is the current code for the "Clear" button:

Sub Clear()
'
' Clear Macro
'

'
    Range("C7:E91").Select
    Range("C7").Activate
    Selection.ClearContents
    ActiveCell.Select
End Sub

Thank you!