Enterprise Global Macros not valid for Project

[Kayla]

This Macro works on any new project created from desktop suite, it does not work on projects created from Project pwa and opened locally.

Sub SetResourceCalendar()


'Declare Variables
Dim Res As Resource
Dim Cal As String

Cal = ActiveProject.Calendar

'Loop All Resources
For Each Res In ActiveProject.Resources

'Check for Real Resource
If Not (Res Is Nothing) Then

'Set Calendar to Match Project Calendar

Res.BaseCalendar = Cal

End If

Next Res

End Sub



help!!