Getting error using if then else stmt

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi
I am using the follwoing code,
For rwIndex 4 to 100
If Month(Worksheets("Sheet1").Cells(rwIndex, 12).Value) > _
Month(Mydate) Then .Interior.Color = RGB(255, 0, 0)
ElseIf Month(Worksheets("Sheet1").Cells(rwIndex, 12).Value) = "" Then
Worksheets("Sheet1").Cells(rwIndex, 12).Interior.Color = 2
Else
Worksheets("Sheet1").Cells(rwIndex, 12).Interior.Color = 2
End If


System gives me 'Complie Error'
Else without if.


Please advise, what is wrong with my code
 
Probably giving you an arbitrary error. Looks like the real problem
is in you For syntax.
For rwIndex 4 to 100 shoudl be For rwIndex = 4 to 100
 
Hi ub.
If Month(Worksheets("Sheet1").Cells(rwIndex, 12).Value) > _
Month(Mydate) Then .Interior.Color = RGB(255, 0, 0)
Click to expand...
If and Then on the same row, end the IF instruction.

For rwindex = 4 To 100
If Month(Cells(rwindex, 12).Value) > Month(Mydate) Then
Cells(rwindex, 12).Interior.Color = RGB(255, 0, 0)
ElseIf Month(Cells(rwindex, 12).Value) = "" Then
Cells(rwindex, 12).Interior.ColorIndex = 6
Else
Cells(rwindex, 12).Interior.ColorIndex = 6
End If
Next

Regards
Eliano
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Error type mismatch in writing macro 2
Excel VBA 1
Excel Applying Code to a Column 0
Selecting cells in the same row in various columns forClearingContents 1
Help with SUMIF in VBA 1
Comparing two books and two sheets, Problems with color coding correct sheet 1
Excel VBA -- Finding last row in group of columns 7
VBA Cell Summation 5

Back
Top