Anzeige
Archiv - Navigation
1260to1264
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
Inhaltsverzeichnis

Makro Drucken

Makro Drucken
Alfonso
Hi Leute
Wer Kann mir helfen
Habe in Makro das soweit Funktioniert „siehe unten“
Das einzige Problem ist wenn ich im Drucker Auswahl Fenster auf Abrechen
gehe wird der Druck trotzdem ausgeführt
Wer kann mir helfen
Private Sub CommandButton30_Click()
Application.Dialogs(xlDialogPrint).Show
Sheets("Tabelle 1").PrintOut
End Sub
Gruß Alfonso

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Makro Drucken
14.05.2012 21:50:42
Josef

Hallo Alfonso,
Private Sub CommandButton30_Click()
  If Application.Dialogs(xlDialogPrinterSetup).Show Then
    Sheets("Tabelle 1").PrintOut
  End If
End Sub



« Gruß Sepp »

Anzeige
AW: Makro Drucken
14.05.2012 22:11:36
Alfonso
Hi Sepp
Habe den Makro ausprobiert
bekommen eine Fehlermeldung
Laufzeitfehler"9":
Index außerhalb des gültigen Bereich
Gruß Alfonso
AW: Makro Drucken
14.05.2012 22:13:05
Josef

Hallo Alfonso,
das liegt dann aber wohl am Tabellennamen (Leerzeichen?)

« Gruß Sepp »

AW: Makro Drucken
14.05.2012 23:07:02
Alfonso
hi Sepp
muss mich korrigieren dein Makro Funktioniert
Habe dein Makro verändert gehabt
Ich würde gerne den Befehl "Dialog PrinterSetup“ in „Dialog Print“ ändern
Dann aber Druckt er die Tabelle die angewählt wurde und ein Teil der Tabelle
in dem der Command Button ist
Dein Makro
Private Sub CommandButton30_Click()
If Application.Dialogs(xlDialogPrinterSetup).Show Then
Sheets("Turbo 4").PrintOut
End If
End Sub
Mein Makro
Private Sub CommandButton30_Click()
If Application.Dialogs(xlDialogPrint).Show Then
Sheets("Turbo 4").PrintOut
End If
End Sub
Gruß Alfonso
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige