Hallo Eri,

Excel hat auch ein Makrorecorder, benutze den mal.

Gruß Hajo

mit dem habe ich es natürlich schon versucht.
trotzdem druckt er immer die vorher markierten zellen, nie die aktuelle gewohlte.
lg eri

Hallo Nick,

die Zellen die markiert sind werden gedruckt, willst Du nur eine Zelle Drucken mußt Du auch nur eine Zelle markieren.

Gruß Hajo

sorry kann mit deiner antwort nichts anfangen.
vielleicht habe ich mich nicht klar ausgedrückt.

also ich markiere z.b. 2 zellen und geh auf den druck button, ausgedruckt wird die kopfzeile obwohl ich was anderes markiert haeb.

markiere ich eine andere zelle, druckt er die vorige aus.
weiß jemand, woran es liegen kann.
danke
lg eri

Hallo Nick,

Du benutzt schon das Office Symbol und wählst da Drucken und im folgenden Dialog wählst Du Markierung?

Gruß Hajo

nein, ich benutze nicht das office drucksymbol sondern
ich habe auf dem tabellenblatt einen button erstellt. dieser button soll mittels makro markierte zellen über einen kleinen belegdrucker ausdrucken. wie schon erwähnt er druckt immer die vorher markierteen zellen und nicht die aktuell gewünschte.
lg eri

Hallo Eri,

versuche dieses Makro. Bei mir funktioniert es.

Sub MarkDruck()
Selection.PrintOut Copies:=1, Collate:=True
End Sub

Auf der zudruckenden Seite kann jedes Mal vor dem Druck ein anderer Bereich marliert werden.

Das Makro über die Eigenschaften deines Commandbuttons einbinden. Dann sollten deine Wünsche in Erfüllung gehen.

Gruß
Joachim

hallo Nick,

meine Beschreibung war um das Makro mit dem Makrorecorder aufzuzeichnen und Du hättest einen ähmnlichen Code wie vn Joachim erhalten.

Gruß Hajo

danke, joachim, das makro habe ich geändert.
jetzt funktioniert der button (command button) nicht mehr.
sorry, bin leider der totale anfänger....... ich komme nicht drauf, wie ich das hinkriege. habe schon in der hilfe gestöbert. leider erfolglos.
darf ich euch noch einmal belästigen????
biiiitte...
danke
lg eri

Hallo Eri,

Du hast schon die Eigenschaft TakeFocusOnClick geändert.

Gruß Hajo

was sollte da stehen?
lg eri

Hallo Eri,

nicht Standard True sondern False

Gruß hajo

nein, das ist es leider nicht.
habe ich in der zwischenzeit schon umgestellt.

wenn ich auf den button klicke kommt folgende fehlermedlung:

Private Sub CommandButton1_Click()
drucken
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub


ich habe hier nichts verändert.
danke für die hilfe
lg eri

so den command button habe ich wieder zum drucken gebracht aber es ist wie am anfang, es wird immer das vorher markierte gedruckt obwohl ich all eure ratschläge befolgt habe.
hiiilfe, biiitte
danke
eri

Guten Abend Eri,

ich habe mich hingesetzt und die Schritte auf-
geschrieben, die ein Makro mit Schaltfläche
in die Symbolleiste einbinden.

Vorbereitung für das Benutzen des Druckmakros!

- Excel mit einer leeren Tabelle öffnen.

- Die neue Mappe als Eigene.xls in dem
Ordner:
C:\Programme\Microsoft Office\Offce\
XLStart speichern.

- In der Menüleiste auf Extras -> Makro ->
Visual-Basic-Editor klicken.

- In dem Fenster "Projekt - VBA-Projekt
die Datei "Eigene.xls" anklicken und mit
der rechten Maustaste drauf klicken. In
dem erscheinenden Menü Einfügen und in
dem weiteren Untermenü "Modul" auswählen.

- Es öffnet sich ein Fenster in dem Du
jetzt den Code meines Makros einfügen
kannst.
Das Makro noch einmal zum Abschreiben:

Sub MarkDruck()
Selection.PrintOut Copies:=1, Collate:=True
End Sub

- Danach in der Menüleiste auf Datei und auf
Schließen - Zurück zu Microsoft Excel
klicken.

- Mit der rechten Maustaste auf die Symbol-
leiste klicken und ziemlich weit unten im
Kontextmenü auf Anpassen drücken.

- In dem Fenster anpasen auf das Register
"Befehle" klicken.

- In dem Auswahlfenster den Eintrag "Makros"
auswählen und im rechten Fenster "Schalt-
fläche anpassen" an die Stelle in der Symbol-
leiste plazieren, wo das Symbol stehen soll.

- Das leere Symbol in der Symbolleiste noch
einmal mit einem Klick mit der linken Maus-
taste anklicken.

- Im Fenster "Anpassen" unten rechts auf die
Schaltfläche "Auswahl ändern" drücken. In
die Textzeile einen Namen eingeben, wie z.B.
Markierte Drucken,
danach die Maus auf "Schaltflächen ändern"
ziehen. Es wird eine Auswahl an Symbolen an-
gezeigt. Einfach ein Symbol anklicken, es
automatisch der neuen Schaltfläche hinzu
gefügt.

- Jetzt "Standard" auswählen, dann auf "Grup-
pieren" klicken und ganz unten auf "Makro
zuweisen" klicken.

- Es öffnet sich das Auswahlfenster "Zuweisen".
Hier bei "Makros in:" den Eintrag "Diese
Arbeitsmappe" auswählen. In dem Auswahlfenster
dadrüber das Makro anklicken und rechts auf
"OK" klicken. Das Fenster "Anpassen" mit der
Schaltfläche "Schließen" wieder schließen.

- In der Menüleiste auf Fenster klicken und
auf den Eintrag "Ausblenden" klicken. Die
sichtbare Tabelle wird jetzt in den Hinter-
grund ausgeblendet.

- Excel jetzt beenden und die Frage nach der
Speicherung der Datei "Eigene.xks" mit JA
beantworten.

- Danach Excel wieder neustarten. Ab sofort
steht Dir das Makro für alle Exceldateien
zu Verfügung.

Das ganze sieht jetzt etwas mächtig aus, ist
es aber nicht. Die Lösung halte ich für dein
Problem am geeignetsten. Ein Commandbutton ist
in der Regel immer Datei bezogen. Ein Makro
im Startupverzeichnis "XLStart" mit einer
dauerhaften Schaltfläche in der Symbolleiste
kann bei allen Exceldateien eingesetzt werden.
Besteht das Verzeichnis (sprich: Ordner) noch
nicht, dann lege es in dem oben beschriebenen
Pfad neu an.

Ich hoffe, Du kannst damit etwas anfangen und
dein Problem endgültig lösen. Ansonsten schreib
deine Emailadresse oben links in meinen Pager,
damit ich Dir notfalls direkt helfen kann.

Gruß
Joachim

Hallo Joachim,
vielen, vielen Dank für die Mühe und die tolle, ausführliche Anleitung.
Ich habe sie jetzt Schritt für Schritt befolgt und hoffe, dass sie am Freitag auch in der Firma klappt (zu Hause funktioniert es - aber in der Firma habe ich zwei Drucker dran hängen).
Wenn nicht komme ich auf dein Angebot zurück und gebe dir meine mail Adresse. Aber ich bin guter Dinge.....

Im Grunde hätte mir der Command Button gereicht, weil ich ihn nur auf diesem Tabellenblatt sehr oft brauche.
Hast du vielleicht einen Buchtipp für mich wo ich mehr über Makros erstellen in Excel lernen kann?

Nochmals
Danke, danke, danke
es ist schön zu wissen, dass es noch hilfsbereite Menschen gibt.

Liebe Grüße
Eri

Hallo Eri,

erst einmal ganz zu Anfang. Ich muß für alle User, die sich hier mit Problemen anderer User beschäftigen, die Lanze brechen.
In der Regel bedarf es manchmal kurzer Erklärungen oder Hinweise, um zur Problemlösung beizutragen.

Jeder einzelne, auch hier gibt es Ausnahmen, ist bemüht, das gestellte Problem sehr ernst zu nehmen. Ich habe mir die einzelnen Antworten genau angesehen und feststellen können, dass Du immer wieder auf den Command-Button zurück gekommen bist. Damit ist die Richtung vonvornherein festgelegt.

Hättest Du von Beginn an einen anderen Lösungsweg zu gelassen, wäre ein ähnlicher Vorschlag auch deutlich früher gekommen. Will sagen, die Marschrichtung war von Dir sehr eingeengt.

Ich selbst habe mir ein Excelbuch incl. VBA-Programmierung gebraucht für Excel 95 besorgt und vor Jahren eines für Excel 97. Der Unterschied bei beiden ist die Sprache. Für Excel95 sind die Befehle in deutsch und Excel97 in englisch. Mein Englisch ist miserabel, aus diesem Grund brauche ich die deutsche Version.

Für das Excel95-Buch bin ich über mehrere Computerbörsen gelaufen und habe es dort gebraucht beim zweiten Anlauf gefunden.
Bücher von Markt und Technik oder dem Sybex-Verlag sind ganz brauchbar. Für das Selbststudium empfehle ich ein Kompendium, das in Lexikonform aufgebaut ist. Das heißt, ich habe je Version zwei Bücher. Wenn Du die Grundfunktionen und die wichtigsten Möglichkeiten kennen gelernt hast, kann Du das meiste auf neuere Excelversionen analog übertragen.

Hinsichtlich Druckerwechsel halte ich es so, dass ich manuell den Standarddrucker wechsel, weil ein Wechsel auf einen zweiten Drucker ausgesprochen selten vorkommt.

Sollten noch Fragen bestehen, gehe über meinen Pager.

Gruß
Joachim