Thema Datum  Von Nutzer Rating
Antwort
13.04.2021 17:16:33 Andreas
NotSolved
13.04.2021 17:28:39 Mackie
NotSolved
13.04.2021 17:33:10 Gast3571
NotSolved
13.04.2021 17:49:29 Mackie
NotSolved
14.04.2021 09:23:58 Andreas
NotSolved
Blau mit VBA bestimmte Bereiche drucken
 14.04.2021 14:35:43 Andreas Senger
NotSolved
14.04.2021 17:31:09 Mackie
NotSolved
15.04.2021 09:33:45 Andreas
Solved

Ansicht des Beitrags:
Von:
Andreas Senger		 Datum:
14.04.2021 14:35:43		 Views:
476		 Rating:
     
Antwort:
  Ja
Thema:
mit VBA bestimmte Bereiche drucken

Hi Mackie,

fuktioniert jetzt alles wie es soll, vielen Dank nochmal.

1 neue Frage hab ich noch, und zwar wie kann man einen Drucker für diese Dokumente definieren, der nicht der Standartdrucker ist?

Der Drucker heißt TEC B-SA4T

Sub DruckeBereich()
    Dim i, max As Integer, vz, bz
    max = Sheets("Vorgabe").Range("C3").Value
    If max < 1 Then max = 1
    If max > 6 Then max = 6
    For i = 1 To max
        vz = i * 3 - 2: bz = i * 3
        Worksheets("Druck1").Range("A" & vz & ":B" & bz).PrintOut Copies:=1
        Worksheets("Druck2").Range("A" & vz & ":B" & bz).PrintOut Copies:=1
    Next i
End Sub

 

Vielen Dank Vorab

Gruß Andreas 

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
13.04.2021 17:16:33 Andreas
NotSolved
13.04.2021 17:28:39 Mackie
NotSolved
13.04.2021 17:33:10 Gast3571
NotSolved
13.04.2021 17:49:29 Mackie
NotSolved
14.04.2021 09:23:58 Andreas
NotSolved
Blau mit VBA bestimmte Bereiche drucken
 14.04.2021 14:35:43 Andreas Senger
NotSolved
14.04.2021 17:31:09 Mackie
NotSolved
15.04.2021 09:33:45 Andreas
Solved