Problem with a macro generating a msgbox instruction

**Johnb11** · 11-18-2014, 03:43 PM

Hello everyone. I am a novice when it comes to VBA but my problem is this:
I have a sheet which generates a calculated time in column J. This comes from a function of two times automatically generated from two other columns. What I'm trying to do is to generate an error message (or warning message) if the calculated time in column Jexceeds 30 minutes. I have written the following macro but it doesnt work. Can anyone help?

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column("J").Value > 0.042361111 Then
MsgBox "Downtime needs recording"
End If
End Sub

I think there may be a problem with the time as I've entered it as a decimal but other than that I dont know how to fix it

Hope someone can help please.

**humdingaling** · 11-18-2014, 11:28 PM

please use code tags around your code in future

how is your function triggered? are your changing cells data or are you refreshing data?

Please Login or Register  to view this content.

maybe something like this is what your after?

**Johnb11** · 11-19-2014, 01:04 PM

Thanks for the reply. Just to let you know what I'm doing. For example my worksheet:

Start time: 13:00
Finish time: 13:45

So when the finish time is great than 30 minutes from the start time I'd like an error message.

So I tried your code, I tagged it onto the end of the existing macro I have in place and I'm getting the error message now "Ambiguous name detected: Worksheet_Change" .....it says to change the name or how do I make this a separate macro in VB?

I hope this makes sense. Help gratefully received.

**humdingaling** · 11-19-2014, 07:07 PM

you cant have two worksheet_change codes at the same time
that's probably what the error message is for

save a copy of your file and replace your code with mine or vice versa then try again