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

Forumthread: Userform Schleife

Userform Schleife
25.06.2008 12:27:00
Rocky
Hallo Excelfans,
Ich hab nen Problem, das bestimmt ganz leicht zu lösen ist. Ich hab eine Userform (Userform2) mit 60 Optionbutton. Jeder Optionbutton soll andere Hintergrundfarbe bekommen.
so siehts aus

Private Sub UserForm_Initialize()
For a = 1 To 60
Controls("OptionButton" & a).BackColor = a
Next a
End Sub


Aber alle bekommen die gleiche Farbe.
Was mach ich falsch?
Gruß Rocky
"Wenn unter den Blinden der Einäugige König ist, dann findet man hier die Herren der Ringe"

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform Schleife
25.06.2008 12:33:00
Hajo_Zi
Hallo Rocky,
Excel kann max 56 Farben darstelen, wenn man die Farbpalette verändert hat. Ansonsten sind es nur 46 unterschiedliche.

AW: Userform Schleife
25.06.2008 12:41:55
Rocky
Hallo Hajo,
geht trotzdem nicht
https://www.herber.de/bbs/user/53347.xls
Kannst du nochmal gucken.
Gruß Rocky

Anzeige
AW: Userform Schleife
25.06.2008 12:45:51
Rudi
Hallo,

Was mach ich falsch?


So ziemlich alles.
Hast du dir die BackColor-Eigenschaft eines OptBtn mal angeschaut? Was steht da?
Gruß
Rudi

AW: Userform Schleife
25.06.2008 12:48:00
Rocky
Hallo Rudi,
ich verstehe was du sagst, aber nicht was du meinst.
Kann man das auch noch mal in deutsch haben.
Gruß
Rocky

Anzeige
AW: Userform Schleife
25.06.2008 12:57:20
Rudi
Hallo,
dein VBA-Level solltest du mal gründlich überdenken.
Rechtsklick auf einen OptBtn-Eigenschaften. Dann gucken, was neben BackColor steht. Es sollte dir dann klar werden, warum deine Schleife nicht funktioniert.
Deut(sch)lich genug?
Gruß
Rudi

AW: Userform Schleife
25.06.2008 13:01:31
Rocky
Das war Deutschlich genug,
hast du nen alternativen Vorschlag?
Ich will ja nur erreichen, das der Anwender sich ne Farbe aussuchen kann.
Danke
Rocky

Anzeige
AW: Userform Schleife
25.06.2008 13:17:15
Rudi
Hallo,

hast du nen alternativen Vorschlag?


Natürlich.
Um bei deinem Schema zu bleiben:


Controls("OptionButton" & a).BackColor = Thisworkbook.colors(a)


a
Gruß
Rudi

Anzeige
Vielen Danken w.T.
25.06.2008 19:41:00
Rocky
Dank dir.

Gruß Rocky



Wenn unter den Blinden der Einäugige König ist, dann findet man hier die Herren der Ringe!


Anzeige
;

Forumthreads zu verwandten Themen

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