Auto fill based on another cell value

[gta1216]

I am not sure if this was asked before. I tried searching, but didn't find any. Maybe I'm searching by wrong keywords.

I have an excel sheet where F9 and F10 is blank. When printed on paper, it should show # / #. Imagine Microsoft Word setup with page numbering.

Depending on the project we are working on, the value in F10 can be any number, say the value is 3. I need to print 3 pages showing 1/3 in 1st page, 2/3 in 2nd page, 3/3 in 3rd page on the specific cell. I would like to setup a macro so that if I enter 3 in F10, it'll auto fill F9 with 1,2,3..., and it'll also print 3 pages (depends on the value in F10). Does anyone know how to set it up?

 

[DanteAmor]

Use this to print sheet

Sub Print_Sheet()
    For i = 1 To Range("F10").Value
        Range("F9").Value = i
        ActiveSheet.PrintOut
    Next
End Sub