View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Phil Hageman Phil Hageman is offline
external usenet poster
 
Posts: 80
Default Good code not working???

The object with this code is that in either of the
worksheets, if the user enters "100" in M15, and "120" in
M16, the message comes up. Nothing happens when these
test values are entered. Furhter, there are no error
messages. Can someone help with this? Does the value in
the MyArray have anything to do with it?

Sub Descending_Values()

Dim MyArray() As Integer
ReDim MyArray(3) ' or, the maximum characters in the
target cells
MyArray(3) = 3

If (Worksheets("1. Customer").[M15] < [M16] Or _
Worksheets("2. Financial").[M15] < [M16]) Then
MsgBox "Target cannot be greater than Chart Max"
End If
End Sub

Thanks, Phil