Office: Markieren und Drucken

Hallo,

habe ein Problem und versuche es mal einfach zu beschreiben.

Habe eine Exel-Tabelle in der ich immer wechselnde Berechnungen vornehme. Es gibt nun einen Teil dieser Tabelle, den ich immer ausgedruckt benötige.
Also muss ich diesen Teil markieren und dann drucken.

Meine Frage:
Gibt es eine Möglichkeit, die dieses automatisch für mich tut?
z.B.: Eine Zahl in eine Zelle eingeben und schon wird der gewünschte Bereich markiert und ausgedruckt.

 

Hallo Michael,

wenn es immer der gleiche ist lege doch Druckbereich fest.

Gruß Hajo

 

Hallo Hajo,

es ist immer der gleiche Druckbereich.

Kannst du mir sagen, wie ich das mache?

Gruß
Michael

 

Hallo Michael,

Datei, Seite einrichten, Register Tabelle,Druckbereich auswählen und in Tabelle markieren.

Gruß Hajo

 

Hallo Hajo,

das ist mir klar.

Das muss ich dann aber bei jeder Berechnung wiederholen.

Ich suche nach einer Möglichkeit (Formel), bei der ich z.B. eine Zahl in eine Zelle eingebe. Dieses soll dann bewirken, dass der von mir gewünschte Bereich automatisch markiert und ausgedruckt wird.

 

Hallo Michael,

da kann ich nichts zu schreiben, ich sehe Deine Datei nicht und ich sehe auch nicht was Du machen willst.

Gruß Hajo

 

Ich versuchs noch mal:

Ich habe eine Exel-Tabelle, in der ich Berechnungen vornehme.

Die Ergebnisse erscheinen immer im Bereich A1 bis D10.

Nur diesen Bereich möchte ich ausgedruckt haben. Ich stelle mir vor, z.B. wenn ich in der Zelle A12 eine Zahl eingebe, wird automatisch der Bereich A1 bis D10 ausgedruckt.

Um dieses zu veranlassen suche ich eine Formel.

 

Hallo Michael,

lege den Druckbereich wie geschrieben fest und Dann unter die Tabelle folgenden Code

Code:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$12" Then ActiveSheet.PrintOut
End Sub

Gruß Hajo

 

Einfach in beliebige Zellen eingeben?

Was muss ich tun damit er druckt?

Bleibt es für das nächste öffnen der Tabelle gespeichert?

 

Hallo Michael,

dann

Code:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    ActiveSheet.PrintOut
End Sub

wenn Du die Tabelle speicherst ja.

Gruß Hajo

 

Hallo Hajo,

für begriffsstutzige wie mich jetzt mal zusammengefasst.

1. Ich lege den Druckbereich fest - ist mir klar

2. Wo schreibe ich den Code rein?

3. Drucken des Bereiches wird dann durch Mausklick auf Drucker veranlasst?

 

Hallo michael,

zu 1 ja
zu 2 unter die Tabelle, auf das Register gehen, rechte Maustaste Code anzeigen, Code ins rechte Fenster kopieren.
zu 3 Nein, Du hattest geshrieben bei Eingabe in irgendeiner Zelle. Also wenn Du irgendwo was eingibst wird der Bereich gedruckt.

Gruß Hajo

 

Probiere ich aus und sage Bescheid.

Danke im voraus.

Michael

 

Hallo Hajo,

klappt/druckt super.

Habe nur vergessen, dass ich in andere Bereiche der Tabelle Zahlen eingebe, um im Druckbereich die Ergebnisse zu sehen.
Gebe ich nun Zahlen ein, wird der Druckbereich gedruckt.
Kann ich das Komando zum drucken auf eine Zelle festlegen?

Michael

 

Hallo Michael,

das ist mein Code von 11:33

Gruß Hajo