adding comments

[mvhh]

i have made a spreadsheet on weight. i want a comment to come up if a certain number is entered. eg if number is less than 100, i want a comment to come up saying well done.

 

[VoG]

Try this: right click the sheet tab, select View code and paste in

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then 'C
    If Target.Value < 100 Then MsgBox "Well done", vbExclamation
End If
End Sub

Change the 3 to the number of the column that weights are entered in.

 

[mvhh]

i tried it but nothing is coming up. i have checked it is definitely the right comment but it doesnt seem to work. any other things i could try?

 

[VoG]

Did you place the code in the sheet's code module as I explained? It is event code that will not work in a standard module.

 

[mvhh]

Im not sure what you mean by event code but i went onto the spreadsheet, right-clicked and pressed view code. this came up with an empty box called Sheet1 (Code). i pasted the thing you gave me and changed the column thing where you wrote 3 to the right letter. then i losed it and tried typing a few numbers on the spreadsheet but nothing came up, have i missed something out?

 

[VoG]

changed the column thing where you wrote 3 to the right letter.

It has to be a number - for example 5 for column E.

 

[mvhh]

ok thanks it works now, how would i put it for in between two values?

 

[VoG]

Try like this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then 'C
    If Target.Value > 50 And Target.Value < 100 Then MsgBox "Well done", vbExclamation
End If
End Sub

 

[mvhh]

it has come up with 'compile error. ambiguous name detected: worhsheet_change' have i typed something wrong?

 

[VoG]

You need to replace the original code with the one that I posted above (that checks for weights between 50 and 100).