Makro läuft nicht richtig
01.07.2004 19:14:29
Ralf
Frage eines Anfängers. Ich habe ein Makro, das auf der Seite "Druckausgabe" Kontrollkästchen abfragt und dann jeweils einen Bereich der ausgewählten Seiten markieren und dann drucken soll. Ich bekomme aber immer nur die Seite "Druckausgabe" auf den Drucker. Wo ist hier mein Fehler?
Sub DruckAuswahl()
1 Sheets("Druckausgabe").Select
2 If Range("J9") = WAHR Then Worksheets("Deckblatt").Select
3 If Range("J9") = FALSCH Then GoTo 6
4 Range("A1:E49").Select
5 Selection.PrintOut
6 Sheets("Druckausgabe").Select
7 If Range("J10") = WAHR Then Worksheets("Ausdruck 1").Select
8 If Range("J10") = FALSCH Then GoTo 11
9 Range("A1:H58").Select
10 Selection.PrintOut
11 Sheets("Druckausgabe").Select
12 If Range("J11") = WAHR Then Worksheets("Ausdruck 2").Select
13 If Range("J11") = FALSCH Then GoTo 16
14 Range("A1:G59").Select
15 Selection.PrintOut
16 Sheets("Druckausgabe").Select
Das Makro steht auch auf der Seite "Druckausgabe" (bei den Makros).
Vielen Dank
Ralf