Msgbox question

[ipbr21054]

Hi,

The code in use is shown below.

Please can you explain why or what this part refers or does warning = MsgBox(Range("A6").Value

I press the button,i am asked the question,the range in question that will be changed to 0 is C1:F17 so im lost as to why A6 is even there.....

Sub zero()'
' zero Macro
'


'
    Dim warning
    warning = MsgBox(Range("A6").Value & "Are You Sure You Wish To Zero All The Cells ?", vbQuestion + vbYesNo, "Warning This Will Delete The Cell Info")
    If warning = vbNo Then Exit Sub
    
    
    Range("D1", "D17") = "0"
    Range("F1", "F17") = "0"
    Range("C1:F17").Select
        With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorAccent5
        .TintAndShade = 0.599993896298105
        .PatternTintAndShade = 0
        End With
    Range("A13").Select
End Sub

 

[ipbr21054]

My apologies,
I now understand what you have said & confirm its all true.

Thanks