Why do you need VBA for this?

Just use the Title and Author content controls that you find under Insert | Quick Parts | Document Property on both the front page and in the header.