consecutive page numbers across workbook

[youssef78]

I had a work book with large amount of different sheets also the sheets has a deferent sizes .
I need a VBA code that
do not effect the printing setup of the sheets.
insert a consecutive page number in the center footer and the name of the report in the right footer
such that the numbers start at a chosen number( because it is a part of a large report)
also the page number must not compared to the whole workbook like x and not(x of y) where y is the whole number of pages of the workbook
and the right footer can be added for the whole report in a message box.
thank you.

 

[youssef78]

any one of the experts can help

 

[youssef78]

there is a lot of sheets