@Tino
29.03.2009 13:25:24
Jörg
du hattest mir vor einigen Tagen diesen Tip gegeben:
ChBoxen gruppieren, dann:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With ActiveWindow.VisibleRange(5, 1)
Tabelle1.Shapes("Gruppierung 9").Top = .Top
Tabelle1.Shapes("Gruppierung 9").Left = .Left + .Width / 2
End With
End Sub
Erinnerst du dich? Hatte ich eingebaut - klappte auch. Abgesehen davon, daß ich das Ganze mit Forumshilfe inzwischen per Userform geregelt habe, blieb da aber noch eine Frage übrig, aber in den Tagen danach warst du nicht im Forum:
Vor der Gruppenbildung lösten die ChBxen im Blatt mit
If Sheets(1).OLEObjects("CheckBox" & i).Object.Value = False Then ...
aus, was sie sollten. Nach Gruppenbildung ging das nicht mehr, und ich bekam die Meldung "die OLE-Eigenschaft des Worksheet-Objekts kann nicht zugeordnet werden". Also irgendwie hat die Gruppierung bewirkt, daß ich die ChBoxen des Blattes aus der Gruppe heraus anders ansprechen muß.
Kanns du mir die Syntax dafür sagen?
Viele Grüße, Jörg
Anzeige
