Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1248to1252
1248to1252
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Backcolor bei OptionsButton1 bis 20 ändern

Forumthread: Backcolor bei OptionsButton1 bis 20 ändern

Backcolor bei OptionsButton1 bis 20 ändern
Niko
Hallo zusammen,
ich möchte mittels Schleife die BackColor von mehreren OptionsButton (1 bis 20) ändern.
Kann mir jemand den Code hierfür posten?
Danke für eure Mühe.
Gruß
Niko
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
gegenfrage
20.02.2012 13:25:18
Tino
Hallo,
wo sind diese, auf einer Tabelle oder einer Userform.
Auf der Tabelle!? Aus Formularsteuerelemente oder Activ-X Steuerelemente?
Gruß Tino
AW: gegenfrage
20.02.2012 13:37:20
Niko
Hallo Tino,
hab ich leider vergessen...die Optionsbutton sind in einer Tabelle und ActivX-Steuerelemente.
gruß
niko
AW: gegenfrage
20.02.2012 13:46:46
Tino
Hallo,
dann kannst Du es mal so versuchen.
Die Tabelle und die gewünschte Farbe (RGB) müsstest Du noch anpassen!
Sub TabelleButton()
Dim i As Integer, oShap
With Sheets("Tabelle1") 'Tabelle anpassen
For i = 1 To 20
.Shapes("OptionButton" & i).DrawingObject.Object.BackColor = RGB(90, 255, 255)
Next i
End With
End Sub
Gruß Tino
Anzeige
AW: gegenfrage
20.02.2012 14:01:45
Niko
Hallo Tino,
danke für deinen Tipp.
Ich bekomme die Meldung 'Index außerhalb des gültigen Bereichs' angezeigt.
i bezieht sich doch auf die Nr der einzelnen OptionButton, wieso dann diese Meldung?
Gruß
Niko
Danke für die Hilfe es funktioniert (oT)
20.02.2012 14:05:51
Niko
Hi
;

Forumthreads zu verwandten Themen

SUMMEWENN oder ZÄHLENNWENN
Heinz

Hallo Leute
Ich bräuchte bitte eine Formel die Sinngemäß so geht.
Zählenwenn( O8:O38) R4
Könnte mir dazu bitte jemand helfen.
Danke & Gruß
Heinz
16.09.2008 18:38:02
Thread-ID: 1010175
12 Beiträge
Summe von bis, abhängig vom Datum in Zelle C4
bis,

Vielen Dank für eure Hilfe, Beispieldatei ist hier zu finden https://www.herber.de/bbs/user/56782.xls
Hallo liebe Helfer,
ich habe ein Tabellenblatt, mit mehreren Zeilen als im Beispiel angegeben, mit IST-Werten (Monat schon kummuliert) und ein Tabellenblatt mit den PLAN-Werten für jede...
14.11.2008 11:30:00
Thread-ID: 1024502
7 Beiträge
Zahl 1 bis 7 nur in Zelle eintragen dürfen
Korl

Hallo,
ich möchte in einem Zellbereich z.B. "B7:BI103" in den jeweiligen Zellen nur die Zahlen von "1 bis"7 eintragen dürfen und sofort den Cursor in der jeweiligen Zeile um eine Zelle nach rechts setzen lassen ohne "Enter" tippen zu müssen.
Den Bereich könnte ich mit Gültigkeitskriteri...
17.11.2008 19:55:00
Thread-ID: 1025380
8 Beiträge
Summe von n bis n+t in VBA
n

Hallo zusammen
Leider habe ich sehr wenig Ahnung von VBA und probiere gerade eine Formel hinzubekommen. Sehr wahrscheinlich ist es für andere einfach, daher bitte ich um Rat.
Ich habe eine Spalte mit Zahlen (B2:B16).
Abgesehen von dieser Spalte habe ich zwei weitere Variablen: t und...
22.01.2009 17:06:49
Thread-ID: 1042696
4 Beiträge
Summe soll auch mit nur 1 Bedingung gezeigt werden
Timmy

Liebe Excler,
ich habe wieder mal ein Problemchen, bei dem ich stocke.
Anbei eine Beispieldatei, in der das Problem erlaeutert ist:
https://www.herber.de/bbs/user/59786.xls
Ich hoffe, jemand weiss mir eine Formel.
Vielen Dank und liebe Gruesse
Timmy
25.02.2009 19:02:54
Thread-ID: 1054140
13 Beiträge
Anzeige
SUMME KGRÖSSTEN
Martin

hallo experten,
mit forgender formel bekomme ich die summe der 6 grössten zahlen:
=WENN(ISTFEHLER(KGRÖSSTE(D5:D19;1));0;SUMMENPRODUKT(KGRÖSSTE(D5:D19; ZEILE(INDIREKT("1:"&6+((ANZAHL(D5:D19)<6)*(ANZAHL(D5:D19)-6)))))))
was auch prima klappt.
ich möchte aber nun das so ums...
21.04.2009 15:01:27
Thread-ID: 1070094
8 Beiträge
Arbeitsmappe drucken bis auf Tabelle1 ohne Button
Jonathan

Hallo liebe Experten,
ich habe folgendes Problem:
In einer Arbeitsmappe liegen 15 Tabellen. Nun möchte ich, dass wenn der Druck-Dialog aufgerufen wird (per Button oder über Datei - Drucken...) und die gesamte Arbeitsmappe ausgewählt wird, Tabelle 1 nicht mitgedruckt wird.
Das ganze...
24.04.2009 16:27:58
Thread-ID: 1071008
7 Beiträge
=SUMME(C1:C18)ZÄHLENWENNc19(>0;-I19)zählenWENNc19(
ottgunter

Hallo
Mit dieser Formel will es nicht klappen.
Kann mir jemand eine bessere Lösung sagen
=SUMME(C1:C18)ZÄHLENWENNc19(>0;-I19)zählenWENNc19( Gruß Gunter
29.05.2009 20:21:45
Thread-ID: 1078296
2 Beiträge
SUMMENFUNKTION WERTE VON 01.01 BIS HEUTE
Gerhard

Nochmal ich...
wieder die gleiche Tabelle
Zeile 4 Spalte C bis N (Jan- Dez.)
Zeile 5 in jeder Spalte ein Wert
Jetzt brauche ich eine Formel die mir von C bis zum jetztigen Monat (Juni) eine Summe bildet und im nächsten Monat bis Juli die Summe bildent usw. (Mit HEUTE()?)
No...
20.06.2009 00:26:40
Thread-ID: 1083045
3 Beiträge
Spalte A durchsucht klein 100 dann spalte b summe
Piola

Hallo
bräuchte eure Hilfe.
Und zwar brauche eine Formel die, die Spalte A durchsucht nach klein 100 dann soll die Einträge von Spalte B summieren
-----A-----------B--------C
1-Gewicht---Erträge
2---43---------234-----Summe Erträge
3---123--------...
21.07.2009 20:35:25
Thread-ID: 1090356
4 Beiträge
Kalender in C3 bis c10 statt nur c3?
lisa

Hallo
Über eine Userform gebe ich via Kalender ein Datum in C3 ein.
Ich würde es gern auf die Spalte C erweitert haben wollen.
Also jede Zelle der Spalte C soll bei selection die Kalendereingabe ermöglichen.
Das ist mein bisheriger VBA- Code Private Sub Worksheet_SelectionChange...
01.10.2009 10:21:40
Thread-ID: 1106589
12 Beiträge
Zellbereich.value A1 bis A30 in Variable
chrissey

Hallo Leut,
ist es sehr schwer eine Variable zu definieren die z.B. alle Werte der Zellen A1 bis A30
enthält.
Hintergrund ist der ich habe im Bereich A1 bis A30 Kundennummern hinterlegt und
hätte jetz gerne eine if schleife die diese prüft
Dim Bereich as ?
if worksheets(...
10.03.2010 14:48:39
Thread-ID: 1144874
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige