Loading...
Quick Links

Reply To: Warning message when indenting tasks?

Home Forums Discussion Warning message when indenting tasks? Reply To: Warning message when indenting tasks?

#6394
CommunityCommunity
Keymaster
Apologies, that was of course wrong, here’s the fixed code. However, when I click the Cancel button the execution is cancelled, but when I click the OK button the message box reappears and reappears and reappears…
    If (Field = pjTaskOutlineLevel And ActiveCell.Task.OutlineLevel < NewVal) And _
(ActiveProject.Tasks(ActiveCell.Task.ID – 1).ResourceNames <> “”) Then
If MsgBox(“The preceeding task has resources assigned.”, vbOKCancel) = vbCancel Then
Info.Cancel = True
Else
OutlineIndent
End If
End If