Click and Clear Contents

[Unexpc]

Hi guys
I want when i click a cell or macro button, then clear content of specific range and cells

 

[Fluff]

Which cells do you want to clear & what sheet are they on?

 

[Unexpc]

Which cells do you want to clear & what sheet are they on?

(C3-F3-B6:F17) & this merged cell (C,D,E,F4)
Name sheet (Factor)
Thats it

 

[mohadin]

Try

Sub tesdt()
    Dim drg As Range
    Set drg = Union(Range("C4:F4"), Range("C3:F3"), Range("B6:F17"))
    drg.ClearContents
End Sub

 

[Unexpc]

Try

Sub tesdt()
    Dim drg As Range
    Set drg = Union(Range("C4:F4"), Range("C3:F3"), Range("B6:F17"))
    drg.ClearContents
End Sub

Correct, Thank You

 

[mohadin]

You are welcome
And thank you for the feedback
Be happy