Thanks, it is in VB: NormalTemplate.AutoTextEntries("Page X of Y").Insert Where:=Selection. _ Range, RICHTEXT:=True had missed that it is richtext :doh: jhaga It would be glorious to see mankind at leisure for once. It is nothing but work, work, work. I cannot easily buy a blank-book to write thoughts in; they are commonly ruled for dollars and cents. A[man], seeing me making a minute in the fields, took it for granted that I was calculating my wages. — business! - I think that there is nothing, not even crime, more opposed to poetry, to philosophy, ay, to life itself, than this incessant business. Henry David Thoreau