updating a field value in word with vba

[EMONTES149]

I have two fields in a footer of a word document. Field One is "ProjectNo", Field Two is "IFCDate" There are over 300 separate documents each with the s Fame two fields in the footer. Each ProjectNo and IFCDate changes per project so I am constantly updating these two fields. The Object Custom properties have a default value of XXXXXXX for the Project Number and DDMMMYYYY for the IFCDate. I am trying to update the value of both these "default" values to the new values below. Can anyone help me? The last line below "ActiveDocument.StoryRanges(wdPrimaryFooterStory).Fields.Update" works great after I update the values in the word dialogue box; however, I am trying to do it with vba. I keep getting compile error, syntax error or does not exist. The reason I am using NewProjectNumber = ("112233") is because I plan on setting these variables to cell values in an excel spread sheet. I can really use some help. Thanks in advance
Sub UpdateFooterFieldValue()

NewProjectNumber = ("112233")
NewProjectDate = ("25 DECEMBER 2017")

ActiveDocument.FormFields("ProjectNo").Result = NewProjectNumber
ActiveDocument.FormFields("IFCDate).Result = NewProjectDate

ActiveDocument.StoryRanges(wdPrimaryFooterStory).Fields.Update

End Sub