SC
Just a guess, but it may be because you have unqualified Cells methods.
Depending on where your code is the Cells will be method of the ActiveSheet,
not Worksheets("List")
With Worksheets("List")
.Range(.Cells(tcnt+4,4),.Cells(tcnt+4,8).font etc..
End With
Note the period before Cells. I think if this was the problem, then you
would get an error, but it's all I could see.
--
Dick Kusleika
MVP - Excel
Excel Blog - Daily Dose of Excel
www.dicks-blog.com
"SpaceCamel" wrote in message
...
I have code that populates a list of cells then applies formating
depending
on the content. Like:
If APercent 0 And APercent < 100 Then
Worksheets("List").Range(Cells(tcnt + 4, 4), Cells(tcnt + 4,
8)).Font.ColorIndex = 10
End If
The code works fine when run from within the VB Editor. But if I run it
from Excel (menu or button) the cells are populated but the cells are not
formated. I have tested that the formatting code is being run.
Any ideas of what is going on here?