Create WordMacro.bas