Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1420to1424
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1420to1424
1420to1424
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Druckmakro-Aufzeichnung

Druckmakro-Aufzeichnung
25.04.2015 17:53:36
Matthias L

Hallo
Kann mir jemand erklären was hier der Rekorder aufgezeichnet hat? 

ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"

Wenn ich einfach nur schreib: 

ExecuteExcel4Macro "PRINT(1)"

druckt Excel ja auch.
Was bedeuten 1,,,1,,,,,,,,2 die vielen Komma und das True / False? 

"PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)
Gruß Matthias

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Druckmakro-Aufzeichnung
27.04.2015 11:03:07
fcs
Hallo Mathias,
diese Excel4Macro ist eigentlich ein relikt der Excel-Vergangenheit, aber aus Gründen, die nur MS-Programmierer kennen, wird unter der 2007er-Version beim Recorder noch das Excel4-Makro verwendet, statt der Methode PrintOut.
Die Reihenfolge der vom Makro verwendeten Parameter kenne ich leider nicht. Wenn du mit den Einstellungen im Druckmenü rumprobierst, dann findest du noch einige Parameter heraus.
Die Tatsache, dass das Makro auch ohne Parameter funktioniert, liegt daran, dass alle Druckparameter optional sind.
Ich konnte bei einer Kurzrecherche die Parameter auf die schnelle nicht herausfinden.
Verwende in Makros zum Drucken die PrintOut-Methode. Da findest du unter der VBA-Hilfe auch die Parameter.
Nachfolgend ein paar Beispiele: 
Sub Drucken()
'Parameter von PrintOut
'Ausdruck.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, _
PrToFileName, IgnorePrintAreas)
Dim strDrucker As String
'aktives Blatt
ActiveSheet.PrintOut preview:=True, Copies:=1
'bestimmtes Blatt auf aktivem Drucker drucken
Activeworkbooks.Sheets("Tabelle1").PrintOut
'gesamte Arbeitsmappe
ActiveWorkbook.PrintOut preview:=True
'gruppierte Blätter
ActiveWorkbook.Sheets(Array("Tabelle1", "Tabelle2")).PrintOut preview:=True
ActiveSheet.Select 'Gruppierung aufheben
'selektierte Blätter auf bestimmtem Drucker ausgeben
strDrucker = Application.ActivePrinter 'aktiven Drucker merken
ActiveWindow.SelectedSheets.PrintOut preview:=True, _
ActivePrinter:="\\S150A0002\P100A0068 auf Ne06:"
Application.ActivePrinter = strDrucker
'Markierten Zellbereich drucken
Selection.PrintOut
End Sub
Gruß
Franz

Anzeige
Danke für Deinen Beitrag ...owT
27.04.2015 23:02:03
Matthias L

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige