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

 

[RoryA]

Whatever is in range A6 is used for the start of the warning message, that's all.

 

[steve the fish]

Type something in cell A6 then rerun it. You should notice the difference.

 

[ipbr21054]

Very strange because the message is roughly C10:D14 nowhere near A6 ???

 

[RoryA]

You're missing the point, I think.The content of A6 will be the first part of the message text that appears on the message box. It has nothing to do with where the message appears or what the rest of the code does. (at a guess, I would say that A6 is intended to contain a user name or something)

 

[ipbr21054]

Type something in cell A6 then rerun it. You should notice the difference.

I dont see any change at all

 

[ipbr21054]

You're missing the point, I think.The content of A6 will be the first part of the message text that appears on the message box. It has nothing to do with where the message appears or what the rest of the code does. (at a guess, I would say that A6 is intended to contain a user name or something)

Changing A6 to anything then running the code i dont see or notice anything at all.
I have even selected cells that are empty.

It was a question but as nothing happens i should then just leave/forget about it.

 

[steve the fish]

I dont think you are looking at the textbox if you think nothing is changing. Within the white main body of the textbox is a question. It WILL change if you change the contents of the cell A6 provided the cell A6 is on the activesheet when that line is executed. Anyway if you are happy you are happy.

 

[ipbr21054]

I dont think you are looking at the textbox if you think nothing is changing. Within the white main body of the textbox is a question. It WILL change if you change the contents of the cell A6 provided the cell A6 is on the activesheet when that line is executed. Anyway if you are happy you are happy.

I understand what you are saying but A6 has nothing to do with this button.
Upon the button press cells C1:F17 values are just reset to 0

Cheers

 

[RoryA]

If A6 contained the word Fred, then the message on the message box would be:

FredAre You Sure You Wish To Zero All The Cells ?