Moin zusammen,
ich möchte meinem Excel97 sagen, daß es nach
Druck auf eine Schaltfläche 3 bestimmte Tabellen
drucken soll.
Hat vielleicht jemand einen VBA-Ansatz für mich?
Danke für Eure Hilfe.
Gruß
Rolf
Moin zusammen,
ich möchte meinem Excel97 sagen, daß es nach
Druck auf eine Schaltfläche 3 bestimmte Tabellen
drucken soll.
Hat vielleicht jemand einen VBA-Ansatz für mich?
Danke für Eure Hilfe.
Gruß
Rolf
Hi !
Wenn es immer die gleichen drei Tabellen sind, dürfte dies doch ziemlich einfach mit dem Makrorekorder zu lösen sein.
Über Extras --> Makros --> Aufzeichnen
die Schritte durchgehen (Tabellen markieren und drucken). Habe fertig.
Die Profis schauen sich dann den durch den Rekorder generierten Buchstabensalat an und sagen „Ja. Stimmt. So gehts.“ Der Laie guckt sich den Buchstabensalat an uns sagt „Mhmmm.“ Und läßt Weiteres bleiben.
BARUL76
Ja stimmt, so gehts
)
Die Profis schauen sich dann den durch den Rekorder
generierten Buchstabensalat an und sagen „Ja. Stimmt. So
gehts.“ Der Laie guckt sich den Buchstabensalat an uns sagt
„Mhmmm.“ Und läßt Weiteres bleiben.
Hi Barul76,
ich fühl mich nicht angesprochen, hänge da irgendwie dazwischen*g
Aber der Ansatz ist richtig, erst Makro1 dann Drucken3…
Sub Makro1()
' Makro1 Makro
' Makro am 16.05.2006 von r aufgezeichnet
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End Sub
Sub Drucken3()
Dim n As Integer, Blätter
Blätter = Array("Tabelle1", "Tabelle2", "Tabelle3")
For n = 0 To UBound(Blätter)
Worksheets(Blätter(n)).PrintOut
Next n
End Sub
Gruß
Reinhard
Sub PrintTab()
Sheets(Array("Tabelle1", "Tabelle2", "Tabelle3")).Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
Hallo zusammen,
Das klappt. *artigdankesag*
Gruß
Rolf 