Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: UserForm ausrichten_OptionButtons verschwunden

UserForm ausrichten_OptionButtons verschwunden
09.04.2009 17:14:41
Andreas
Hallo Herber Fans,
Ich bin gerade schon ein wenig am verzweifeln. Ich habe eine UserForm, auf der ein Frame mit zwei Option Buttons gesetzt wird.
Alle UserForm Elemente werde nicht per drag & drop erstellt, sondern über Codes an sich. Die UserForm ruft im Anschluß einen Code auf, der über Schleifen, alle ControlItems korrekt ausrichtet.
Problem ist, daß es nicht richtig funktioniert. Wenn ich den Aufruf („Call UserFormAusrichten(Me)“) auskommentiere, läuft es. Wenn ich diesen Aufruf verwende, sehe ich nur einen OptionButton. Der erste ist verschwunden.
Woran liegt das? Ist meine Logik der Ausrichtung falsch?
Ich möchte es auch gern über einen Code ausrichten, da ich diverse UserForms habe und diese sich bei Code Ausrichtung wesentlich flexibler anpassen lassen.
Erkennt jemand von Euch auf Anhieb meinen Denkfehler?
https://www.herber.de/bbs/user/61121.xls
Vielen Dank und Gruß, Andreas
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: UserForm ausrichten_OptionButtons verschwunden
09.04.2009 17:49:21
Luschi
Hallo Andreas,
wenn Du mal nur diese Schleife laufen läßt

For i = 0 To .Controls.Count - 1
If TypeName(.Controls(i)) = "Frame" Then
MsgBox 123
Else
MsgBox 321
End If
Next i

dann wirst Du feststellen, daß zuerst die Meldung 123 erscheint und dann zweimal hintereinder 321.
Das bedeutet, daß die Formatierungen innerhalb des Frames für die Katz ist, weil in den 2 nächsten Schleifendurchgängen
die Optionbutton wieder umformatiert werden durch den Vba-Code gleich am Anfang der 1. Forschleife.
Und deshalb wird das 2. Optionsbutton genau über das 1. O-Button gelegt, dap die Top- und Left-Werte
identisch sind.
Da das Frame vor den O-Buttons erstell wird, hat dieses auch den Indexwert 0 bei der Reihenfolge der erzeugten Steuerelemente.
Gruß von Luschi
aus klein-Paris

Anzeige
AW: UserForm ausrichten_OptionButtons verschwunden
09.04.2009 18:18:04
Andreas
Hallo Luschi,
vielen Dank für diesen Gedankenanstoß. Das stimmt. D.h. Ich muß an den Optionbuttons feststellen, ob diese im Code der UF in (!) einen Frame geschrieben wurden. D.h. alle Controls, die innerhalb eines Frames stehen, werden nicht formatiert, da es dafür noch eine Schleife innerhalb des Frames gibt. Sie werden also nicht "überformatiert".
Wie kann ich über VBA feststellen: Ich bin in einem Frame!
Dank und Gruß, Andreas
Anzeige
AW: UserForm ausrichten_OptionButtons verschwunden
09.04.2009 19:12:55
Andreas
Hallo Luschi,
ich bin nah an einer Lösung dran und ich glaube, Du mußt hier keinen Gedanken mehr verschwenden. Da gibt es sicherlich noch andere, die Hilfe benötigen.
Danke Dir und schöne Osterfeiertage!
Grüße, Andreas
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige