Live-Forum - Die aktuellen Beiträge
Datum
Titel
10.05.2024 07:04:14
nicht löschbar
09.05.2024 19:15:00
speichern über Makro ändert bedingt formatierte Zellen
09.05.2024 15:49:16
OEE Verlust als Linie an OEE
09.05.2024 13:10:18
Pivot-Tabelle mit Monaten und nicht Tagen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1000to1004
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1000to1004
1000to1004
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

mit Optionsbuttons drucken

mit Optionsbuttons drucken
10.08.2008 09:57:11
Rainer
Hallo und guten Morgen,
ich habe ein Problem mit Optionsbuttons auf einem Formular.
Mein Formular sieht 3 Optionsbuttons vor zur Druckauswahl von verschiedenen Tabellenblättern
1. Berechnung
2. Mitteilungsschreiben
3. Beides
In dem Workbook sind Tabellenblätter mit den gleichen Namen (bis auf "Beides" :-)
Nun soll je nach dem welchen Optionsbutton man markiert, das entsprechende Tabellenblatt gedruckt werden.
Idealerweise soll in dem Formular noch ein Kontrollkästchen aufgenommen werden "Druckvorschau" wenn dies aktiviert ist, soll man "nur" die Druckvorschau sehen.
Die Aktivierung soll über einen Button "Drucken" erfolgen
Ich hoffe ich habe mich verständlich ausgedrückt
Ich hoffe mir kann jemand helfen
Schöne Grüsse
Rainer

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: mit Optionsbuttons drucken
10.08.2008 10:20:00
Martin
Hallo Rainer,
wo genau liegt denn Dein Problem? - In der Abfrage der UserForm-Controls? Hier mal ein Vorschlag mit drei Optionsbutton, einer Checkbox und einem CommandButton1. Diesen Code in der UserForm einfügen.

Private Sub CommandButton1_Click()
If OptionButton1 = True Then
Sheets("Berechnung").Select
ElseIf OptionButton2 = True Then
Sheets("Mitteilungsschreiben").Select
ElseIf OptionButton3 = True Then
Sheets(Array("Berechnung", "Mitteilungsschreiben")).Select
End If
If Checkbox1 = True Then
ActiveWindow.SelectedSheets.PrintPreview
Else
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End If
End Sub


Viele Grüße
Martin

Anzeige
AW: mit Optionsbuttons drucken
10.08.2008 10:30:49
Rainer
Hallo Martin,
das war genau das was ich gesucht habe.
Vielen, vielen Dank
Gruss
Rainer

299 Forumthreads zu ähnlichen Themen

@Hans W. Herber: 1 Million Beiträge - Glückwunsch
mpb

Hallo Hans,
wenn ich die URLs richtig interpretiere, haben wir im Forum soeben die Zahl von 1 Million Beiträgen überschritten.
Herzlichen Glückwunsch zu dem Erfolg Deines "Babys"!
Gruß
Martin
07.08.2008 16:23:47
Thread-ID: 1000004
3 Beiträge
Anzeige
automatisch Berechnen funktioniert nicht
t4z

Hi Leute,
kann mir jmd folgendes Phänomen erklären?
Excel-Datei enthält Formeln, die auf andere Zellen innerhalb der Mappe referenzieren. Die Quelldaten ändern sich, jedoch die Formeln nicht. Unter Extras-Optionen-Berechnung ist "automatisch" aktiv. Ein Drücken auf F9 bringt keinen Erfo...
07.08.2008 17:13:07
Thread-ID: 1000040
3 Beiträge
Aufruf UserForm
lasmik

hallo zusammen
wie kann ich dieses macro erweitern das es auch genau so ausgeführt wird wenn ich d3 anklicke.
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$C$3" Then UserForm1.Show If Not Intersect(Target, Range("C3")) Is Nothin...
07.08.2008 18:04:57
Thread-ID: 1000062
7 Beiträge
Anzeige
Cursor springt in die Pampa - MultiLine TextBox
Kilo

Hallo liebe VBA Profis
ich bin auf ein für mich nicht lösbares Problem - vielleicht sogar Phänomen gestoßen...
Leider kann ich keine Phänomene dieser Art gebrauchen.
Damit es für Sie etwas anschaulicher wird, hab ich mein Problem als Beispiel (https://www.herber.de/bbs/user/54427.xl...
07.08.2008 20:31:08
Thread-ID: 1000095
2 Beiträge
Formel automatisch durch Wert ersetzen (vba)
Tanja

Hallo liebe Leute,
Ich hab in meiner excel-Mappe, in den Zellen: M2:M14 Formeln, die eine ganze Zahl als Ergebnis erzeugen.
So, und nun möchte ich das 1. Berechnungs-Ergebnis quasi "einfrieren".
Mein Problem: Ich möchte kein Makro per Hand auslösen müssen, sondern der Code soll voll...
07.08.2008 21:59:00
Thread-ID: 1000110
5 Beiträge
Farbige Zellen suchen und Zuordnung auflisten
Excel-Opfer

Hallo zusammen,
ich hab nicht so die Ahnung von Makros und Automationen im Excel, bräuchte allerdings "dringend" eine Vereinfachung meines Excelchaos.
es dreht sich um folgende Problematik:
ich muss diverse Dienstpläne in unsere Personalplanung einarbeiten, leider liefert eine Abtei...
08.08.2008 06:47:00
Thread-ID: 1000143
16 Beiträge
Komplizierte Wenn-Formel für kicker-Spiel
Frank

Hallo miteinander,
ich möchte eine Excel-Datei für das offizielle Fussball-kicker-Managerspiel erstellen, leider scheitere ich total an (vermutlich) den WENN-Formeln ..... vielleicht ist das aber auch gar nicht möglich, was ich erreichen möchte :-(
In der Tabelle sollte man in Spalte A...
08.08.2008 07:28:06
Thread-ID: 1000146
4 Beiträge
AW: Excel Makro Starten
Matty

Hallo nochmal....
Was ist an meiner Variante falsch?
Ich habe die Dateinamen als String definiert und in der Schleife den String aufgerufen. Was ist an dem Aufruf Application.Run falsch bzw was muss ich anders formulieren, wenn ich möchte dass die dateien entsprechend der Schleife durch...
08.08.2008 07:42:54
Thread-ID: 1000149
2 Beiträge
Anzeige

Links zu Excel-Dialogen

OptionButton UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
2
2
6
10
1
4
15
3
1
4
2
6
1
2
2
3
2
6
4
4
9
1
6
4