Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Kontrollkästchen auswerten





Frage

Hallo zusammen, ich habe folgendes Problem: ich will eine Übersicht von ca. 20 verschiedenen Arbeitsblättern in einem Index-Blatt in einer Excel-Datei anlegen. Dann kann der Anwender über ein Kontrollkästchen Kreuze setzen, welche dieser Blätter er ausgedruckt haben will. Z.B. steht dann ein Kreuzchen in Checkbox1 für Tabelle 1, ein Kreuzchen in Checkbox 2 für Tabelle2 etc. Das Ausdrucken soll nach Setzen der Kreuzchen über einen Print-Button gehen, dem ich ein Makro zuweise. Dieses Makro soll also alle Blätter ausdrucken, für die in dem Index-Blatt ein Kreuzchen gesetzt wurde. Kann jemand helfen? Danke & Grüße, Michael

Antwort 1 von Hajo_Zi

Hallo Michael,

Kontrollkästechen aus de der Symbolleiste Steuerelemente Toolbox odr Formular?
Soll jede Tabelle einzelne gedruckt werden oder zusammen, wegen Seitenzahl?

Gruß Hajo

Antwort 2 von Michael_Kupser

Hallo Hajo,

danke für die Antwort. Ich habe vor Jahren im Excel-Center-Forum schon einmal Hilfe von dir bekommen :)

Ich wollte die Kontrollkästchen eigentlich als Steuerelemente einfügen.

Seiten jeweils eine, allerdings idealerweise mit unterschiedlichem Gruppierungslevel wählbar. (Einige Zeilen sind gruppiert).

Vielen Dank,

Michael

Antwort 3 von Hajo_Zi

Hallo Michael,

Option Explicit

Sub Auflisten()
Dim InI As Integer
For InI = 1 To 4
With ActiveSheet.OLEObjects("CheckBox" & InI).Object
If .Value = True Then Worksheets(.Caption).PrintOut
End With
Next InI
End Sub

ich bin mal davon ausgegangen das die Beschriftung wie der Tabellenname ist.

Gruß Hajo