kann mir jemand helfen?
Wir würden gerne eine bestehende Rechnung in Excel 2 und 3-fach ausdrucken. Und zwar so,das erst das Original kommt und auf dem 2 bzw 3 Ausdruck Kopie vermerkt ist. Ich habe es zwar mit:
Sub PrintWithDuplicate()
Application.ScreenUpdating = False
With ActiveSheet
.Shapes("Duplikat").Visible = False
.PrintOut
.Shapes("Duplikat").Visible = True
.PrintOut
.Shapes("Duplikat").Visible = False
End With
End Sub
probiert, aber das funktioniert nicht. Ich kenn mich in VBA leider auch nicht so gut aus.