Hello,

I'm trying a lot but I can't manage it. But how can you change the font in column, if you loop through the active tasks? For example I do want only change the color from the start column:

[vba]
Sub SelectTaskRows()
Dim tskT As Task

SelectBeginning

For Each tskT In ActiveProject.Tasks

'This doesn't work! it jumps to the complete wrong row
SelectRow Row:=tskT.Start, RowRelative:=False
Font Color:=pjRed

'this is more or less from excel. There I can manage it but this doesn't work off course for Ms Project
'tskT.Start.Interior.ColorIndex = 39
Next tskT

End Sub
[/vba]
Thanks in advance

Nico