1.)Checkbox als Bedingung; 2.)Werte nebeneinander
12.12.2017 16:32:32
Daniel
nach erbittertem Versuchen heute diese zwei Fragen: Sie haben nichts miteinander zu tun!!!
1.)
Ich habe Checkboxen in einer UF. Wie lautet der Code den ich in mein CommandButton "Ausführen" schreiben kann?
Ich möchte z.B. meine CB_Montag anklicken und wenn ich dann auf den Button Ausführen klicke soll es aus meinem Aktiven Worksheet in dem ich mich befinde("Vorlage") die Zellen B15 bis C17 in das Worksheet "PowerPoint" übernehmen. Geht das ?
Danke.
2.)Kann den Code jemand umschreiben:
With wsP
For Each c In .Range(.Cells(26, 9), .Cells(.Rows.Count, 9).End(xlUp))
If c.Value = "X" Then LB_1.AddItem c.Offset(, -1).Value
If c.Value = "X" Then LB_1.AddItem c.Offset(, -2).Value
Next c
End With
Ich möchte die beiden Werte aus den zwei Spalten in der Box nebeneinander haben, sie sind untereinander Gegliedert?
Schönen Abend!