Factuur 2x afdrukken en woord "kopie" toevoegen

[Ed Stoop]

Ik heb in Excel een factuur en wil graag een knop welke de opdracht geeft het blad 2x af te drukken. Ik wil dan ook dat ie in cel F2 van de 2e afdruk het woord "kopie" neerzet.

Het lukt mij niet om het voor elkaar te krijgen. Kan iemand mij op weg helpen?

 

[Roncancio]

Simpelste manier lijkt mij:

Sub printen()
    ActiveSheet.PrintOut
    ActiveSheet.Range("F2").Value = "Kopie"
    ActiveSheet.PrintOut
        
End Sub

Met vriendelijke groet,


Roncancio

 

[Ed Stoop]

Pff jij bent snel! Ik ga gelijk weer knutselen. Bedankt voor de uitzonderlijk snelle reactie!