Code arrangement
Hi Jacob
This is giving me this:
Compile error
Expected: end of statement.
Sorry for any inconvenience
Thanks.
"Jacob Skaria" wrote:
Try
Range("J65").Value = IIF(Range("A1")Range("A5"),Range("A2"),Range("A4" ))
--
Jacob
"MAX" wrote:
Hello
I want to arrage the code (below).
Instead I write the "TEAM'S Name" by myself, I want to create a formula or
something else in this code so that when A1A5 it appears the team's name in
cell A2 and when A1<A5 it appears the team's name in cell A4. Is this
possible?
This is the code:
Option Explicit
Dim nextSecond
Sub startFlashing()
flashCell
End Sub
Sub stopFlashing()
On Error Resume Next
Application.OnTime nextSecond, "flashCell", , False
End Sub
Sub flashCell()
nextSecond = Now + TimeValue("00:00:01")
Application.OnTime nextSecond, "flashCell"
If Range("J65").Interior.ColorIndex = 3 Then
Range("J65").Interior.ColorIndex = 5
Range("J65").Value = "TEAM's Name"
ElseIf Range("J65").Interior.ColorIndex = 5 Then
Range("J65").Interior.ColorIndex = 3
Range("J65").Value = "CHAMPIONS 2009-2010"
End If
End Sub
Thanks in advance.
|