I am unable to run the following subroutine because of a compile error that
flags the FaceId text in the last line of code ( "method or data member not
found") Why?

Sub DummyMacro()
Dim MenuObject As CommandBarPopup
Set MenuObject = Application.CommandBars(1). _
Controls.Add(Type:=msoControlPopup, _
Befo=11, _
Temporary:=True)
MenuObject.Caption = "Projects"
MenuObject.FaceId = 17
End Sub