title: Color coding tasks in a Microsoft Project Macro
body: <p>This seems like it should be straight forward, but I'm seeing some strange behavior. I'm attempting to color code my tasks based on a flag.  It appears to be correctly coloring the tasks, but at some point in the processing the initial tasks that were colored are getting reset to black. The task that it happens on seems to be fairly inconsistent too. Here's how I'm trying to perform this task (simplified to it's barest form):</p>
  
  <pre><code>Sub ColorTasks()
      Dim t As Task
      For Each t In ActiveProject.Tasks
          SelectRow t.ID, RowRelative:=False
          Font32Ex Color:=2366701
      Next
  End Sub
  </code></pre>
  
  <p>This code seems to work just fine for smaller data sets, but this project contains around 2,000 tasks. Any ideas?</p>