Ausdruck Checkbox / Inhalt
23.08.2004 09:52:02
Markus
Leider ist meine Frage die ich letzte Woche gestellt habe nicht ganz beantwortet.
Hans hat mir eine Code gesendet den er schon mal korrigiert hat, allerdings funzt das auch nicht so richtig. Habe hier noch einmal meine Datei aufgeführt.
https://www.herber.de/bbs/user/9724.xls
Zum Inhalt:
Ich möchte den Inhalt in der Textbox "und nur den Inhalt" ausdrucken. Den Inhalt aber möchte ich selbst bestimmen in dem ich mit einem Häkchen die Check Box anklicke.
Private Sub CommandButton2_Click()
Dim iChb As Integer
For iChb = 1 To 6
Columns("D:I").Columns(iChb).Hidden = Not Controls("CheckBox" & iChb).Value
ActiveSheet.PrintOut
Next iChb
Columns("D:I").Hidden = False
End Sub
Hans hat mir empfohlen die Print schleife zu entfernen. Aber das geht auch nicht!
Wäre nett wenn mir noch einmal jemand helfen könnte.
Gruß und Danke
Markus