Thema Datum  Von Nutzer Rating
Antwort
23.09.2020 13:24:42 mike
NotSolved
23.09.2020 13:33:42 Mase
NotSolved
Rot Drucken per VBA Code
 23.09.2020 14:13:24 mike
NotSolved
23.09.2020 14:54:20 Mase
NotSolved
24.09.2020 05:44:19 mike
Solved

Ansicht des Beitrags:
Von:
mike		 Datum:
23.09.2020 14:13:24		 Views:
552		 Rating:
     
Antwort:
  Ja
Thema:
Drucken per VBA Code

danke mase für den link

ich habe nun folgenden code:

Sub drucken()
Dim wks As Worksheet

For Each wks In Worksheets
If wks.Index <> 1 Then
If wks.Index <> 2 Then

        Sheets(wks.Name).PrintOut Copies:=1
End If
End If
Next

End Sub

 

Wie bekomme ich es hin, dass vor Ausführung des Codes das Druckfenster aufgemacht wird und ich einen Drucker auswählen kann.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
23.09.2020 13:24:42 mike
NotSolved
23.09.2020 13:33:42 Mase
NotSolved
Rot Drucken per VBA Code
 23.09.2020 14:13:24 mike
NotSolved
23.09.2020 14:54:20 Mase
NotSolved
24.09.2020 05:44:19 mike
Solved