Office: (Office 2013) Makro? Mehrere Druckbereiche auf einer Seit festlegen!

Hi,

wunderbar.

Um alles realisieren zu können, benötigst du ein extra Tabellenblatt, in das du alle benötigten Steuerelemente einfügst und mit dessen Hilfe sozusagen die gesamte Steuerung realisiert wird. Du benötigst 36 Kontrollkästchen (für jedes Tabellenblatt außer dem Steuerblatt), 2 Optionsfelder und einen Schalter - also vom Prinzip her so wie in der letzten hochgeladenen Mappe mit dem UserForm.

1. die Entwicklertools hast du aktiviert? Dort findest du in der Befehlsgruppe "Steuerelemente" den Schalter: Einfügen. Es werden dort im oberen Teil "Formularsteuerelemente" und unten "ActiveX-Steuerelemente" angeboten - wir nehmen die oberen.

2. klicke auf "Kontrollkästchen", gehe ins Tabellenblatt (der Cursor ist jetzt ein kleines +) und ziehe die Maus bei gedrückter Taste nach rechts - es entsteht ein Steuerelement, das die Aufschrift "Kontröllkästchen xxx" hat und mit einem um die gesamte Fläche versehen Rahmen markiert ist.

3. Mache nun einen Rechstklick bei markiertem Kontrollkästchen -> Text bearbeiten - dann siehst du den Cursor als Strich (wie in einer Zelle) blinken und kannst den Text ändern.

4. sobald du in irgendeine Zelle klickst, ist die Markierung des Rahmens weg und du siehst nur noch das Quadrat und die Beschriftung. Um das Kontrollkästchen erneut zu markieren fahre einfach den Mauszeiger auf die Beschriftung oder das Quadrat (der Cursor wird zur Hand mit gestrecktem Zeigefinger) und Rechtsklick -> das Menü zur Bearbeitung öffnet sich

Füge also so viele Kontrollkästchen ein, wie du Tabellenblätter hast und beschrifte sie mit den Namen aller Tabellenblätter.
Füge außerdem 2 Optionsfelder mit derselben Beschriftung wie in dem UserForm-Beispiel ein sowie einem Schalter.

Dem Schalter weist du dann das Makro zu, das den Druck realisiert - mache dazu einen Rechstklick auf den Schalter -> Makro zuweisen... Du siehst dann im nächsten Menü den Makronamen "Drucken" - markiere ihn und drücke Ok. Nun ist das Makro mit diesem Schalter verknüpft und sobald du ihn betätigst wird gedruckt.
Das Makro zum Drucken muss in einem allgemeinen Modul stehen.

In der angehängten Mappe habe ich das mal für die vorhandenen Tabellenblätter realisiert.

Ich hoffe, du kommst mit der Erklärung klar - anderfalls einfach rückfragen.

 

dieses makro funktioniert nicht... bin ich zu doof ?

 

hi vielen dank ich schau mir das an und übe heute abend !
vielen dank, melde mich wieder

 

Hi,

übrigens ist mir gerade aufgefallen, dass an beiden Stellen anstelle .PrintPreview selbstverständlich .PrintOut stehen muss, andernfalls wird nur die Druckvorschau angezeigt.