Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
440to444
440to444
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Drucken bei Klick

Forumthread: Drucken bei Klick

Drucken bei Klick
21.06.2004 14:38:47
Valeri
Hallo Forum,
Ich habe in meiner Datei zwei Tabellen, die eine heist "Eingabe" und die andere "Erfassung". In der ersten Tabelle "Eingabe" habe ich ein "Bild 1" mit dem ich Drucken möchte. Wenn ich auf dieses Druckenbild drücke dann soll die Tabelle "Eingabe" und die Tabelle "Erfassung" nacheinander ausgedruckt werden.
Nach möglichkeit soll das Bild auf dem Monitor nicht zwischen den Beiden Tabellen hinn und her wechseln sonder immer nur auf "Eingabe" bleiben.
Danke für die Hilfe.
Valeri
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Drucken bei Klick
Klaus
Hi,
zeichne einfach ein Makro auf.
Anschließend kannst Du das Makro dem "Bild1" zuweisen.
Um den Bildwechsel zu verhindern gibst Du folgendes ein:
Sub Makro1() 'Hast Du gerade aufgezeichnet
Application.ScreenUpdating = False 'Eintragen
.... 'Restlicher Code
Gruss
Klaus
Anzeige
AW: Drucken bei Klick
Marcl
Moin,
das mit dem Bild wechseln bekomme ich nicht hin. Es wird lediglich erst die eine, dann die andere Tabelle gedruckt.

Sub drucken ()
Sheets("Eingabe").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Erfassung").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Eingabe").Select
End Sub

Gruß
Marcl
Anzeige
AW: Drucken bei Klick
21.06.2004 15:27:59
Valeri
Danke für die Schnelle Antwort.
Valeri
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige