C
Carsten Petersen
Hi,
I'm trying to prevent users of Microsoft Project 2003 to alter resource
data. So I have enabled events and created the following procedure:
'********
Private Sub App_ProjectBeforeResourceChange(ByVal res As Resource, ByVal
Field As PjField, ByVal NewVal As Variant, Cancel As Boolean)
Select Case Field
Case pjResourceText30
MsgBox "Don't do this!"
Cancel = True
End Select
End Sub
'********
The event fires as expected, however the update is not cancelled.
The same kind of code works perfectly with the ProjectBeforeTaskChange
event.
All suggestions for a workaround is much appreciated.
Best regards
Carsten
I'm trying to prevent users of Microsoft Project 2003 to alter resource
data. So I have enabled events and created the following procedure:
'********
Private Sub App_ProjectBeforeResourceChange(ByVal res As Resource, ByVal
Field As PjField, ByVal NewVal As Variant, Cancel As Boolean)
Select Case Field
Case pjResourceText30
MsgBox "Don't do this!"
Cancel = True
End Select
End Sub
'********
The event fires as expected, however the update is not cancelled.
The same kind of code works perfectly with the ProjectBeforeTaskChange
event.
All suggestions for a workaround is much appreciated.
Best regards
Carsten