On 2002-10-29 16:44, All the **** names are taken wrote:
Thanks a lot that worked really well.
Private Sub CommandButton1_Click()
.CenterHeader = TextBox1.Value
.CenterFooter = Date
But can you make it so the header/footer is applied to all sheets, and also for the form to close after header/footer has been done.