Hi Bob,

The line when entered in place of what I had, just generates an error.

Can you elaborate any more on what I could change?

Cheers,

Aaron.

Bob Phillips wrote:
Change

If k27 < 90 And f27 < 90 Then

to

If Target("K27").Value < 90 And Target.Value < 90 Then


--

HTH

Bob Phillips

(replace xxxx in the email address with gmail if mailing direct)

"Aaron" wrote in message
oups.com...
Hi,

I have got this code from another thread in my search for a solution to
a cell (f27) firing a macro.

It works well, but I cant get the third condition to work IE Call
Rockwell Both.

Perhaps it can be done a totally different way also.

I want cell f27 changing to fire a macro A

Cell k27 changing to fire a macro B

and if both cells change to fire macro C


Private Sub Worksheet_Change(ByVal Target As Range)
Dim myCell As Range
If Not Intersect(Target, Range("f27")) Is Nothing Then
For Each myCell In Intersect(Target, Range("f27"))
If myCell.Value < 90 Then
Call Rockwell_AddC
End If
If myCell.Value = " " Then
Call Rockwell_RemoveC
End If
If k27 < 90 And f27 < 90 Then
Call Rockwell_Both
End If
Next myCell
End If
End Sub

Any advice greatly appreciated.

Cheers,

Aaron.