Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
1064to1068
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
Inhaltsverzeichnis

@Tino

@Tino
29.03.2009 13:25:24
Jörg
Hi Tino,
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

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: @Tino
29.03.2009 14:03:47
Tino
Hallo,
das geht dann so nicht mehr,
Du kannst aber dass Objekt mit dem Index in dieser Gruppe ansprechen.
Beispiel:

With Tabelle1.Shapes("Gruppierung 9")
Debug.Print .GroupItems(1).DrawingObject.Object.Value
Debug.Print .GroupItems(2).DrawingObject.Object.Value
Debug.Print .GroupItems(3).DrawingObject.Object.Value
End With


Gruß Tino

AW: @Tino
29.03.2009 15:03:03
Jörg
...was bedeutet denn das debug.print dabei?
AW: @Tino
29.03.2009 15:11:24
Tino
Hallo,
dies gibt dir den Wert im Direktfenster aus.
Userbild
Gruß Tino
Anzeige
ok - danke dir! (owt)
29.03.2009 15:24:16
Jörg

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige