Code problem
Are you sure that C3 is exactly 1, it doesn't have some very small
fractional part. Try increasing the decimal places to see.
If so, and dealing with integers, you could use
If Int(Range("C3").Value) = Int(Range("W1").Value) Then
--
HTH
RP
(remove nothere from the email address if mailing direct)
"Patrick Simonds" wrote in message
...
On my spreadsheet C3 contains a formula which returns the number 1 and
cell
W1 value is 1, in this case the code should skip to Continue1: and not
sort
the cells, but it is not. Can anyone tell me why?
If Range("C3").Value = Range("W1").Value Then
GoTo Continue1
End If
If Range("C3").Value "" Then
Range("A4:C8").Select
Selection.Sort Key1:=Range("A4"), Order1:=xlAscending,
Header:=xlGuess,
_
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End If
Continue1:
|