MS Project font propertie wijzigen hoe?

[nkamp]

Hallo,

Ik doorloop alle tasks via een for each. Dat werkt op zich goed om bv. een waarde toe te kennen. Maar als ik een waarde van een bepaalde MS Project cell wijzig dan wil ik ook de font kleur wijzigen. Heeft iemand nog een idee in de vorm zoals hieronder in de voorbeeld code?

Alvast bedankt.

Sub SelectTaskRows() 
    Dim tskT As Task 
     
    SelectBeginning 
     
    'Alle taken doorlopen, werkt correct
    For Each tskT In ActiveProject.Tasks 
         
        'Voorbeeld: onderstaande werkt niet maar zoiets moet volgens mij worden.
        tskT.Start Font Color:=pjRed 
   
    Next tskT 
     
End Sub

Nico