Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 17:49:39
Bedingte Formatierung
25.04.2024 16:50:59
2 Zellen in 2 Blättern mit unterschiedlichen Bereichen vergl
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1480to1484
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1480to1484
1480to1484
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

beliebige Füllfarbe auf andere Zellen übertragen

beliebige Füllfarbe auf andere Zellen übertragen
18.03.2016 16:28:45
Harald
Hallo,
ich suche für folgende Problemstellung eine Lösung:
Ich möchte eine best. Zelle, Z.B. A1 beliebig! einfärben.
Im Anschluss sollen bestimmte (immer die gleichen) Zellen z.B. B1:B5 und D1:D10 in dieser Farbe eingefärbt werden.
Ich glaube das problem ist, dass die Farbe nicht definiert ist, mit der eingefärbt wird?

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

Betreff
Datum
Anwender
Anzeige
AW: beliebige Füllfarbe auf
18.03.2016 16:46:19
Steve
Hallo Harald,
"nicht definiert" gibt es nicht, sonst würde Excel die Farbe dir gar nicht anbieten können.
Private Sub worksheet_SelectionChange(ByVal Target As Range)
Range("B1:B5,D1:D10").Interior.ColorIndex = Range("A1").Interior.ColorIndex
End Sub
Den Code in den Bereich des Tabellenblattes: Rechtsklick auf den Reiter des Blattes, "Code anzeigen" wählen und dort rein.
lg Steve

AW: beliebige Füllfarbe auf
18.03.2016 16:56:13
Harald
Hallo Steve,
danke für das Skript.
Funktioniert "halb".
Es klappt bei Standardfarben, geht jedoch nicht bei einigen Designfarben. Es wird zwar immer der richtige Bereich definiert, aber teilweise mit falschen Farben.
Kann Excel hier nicht den richtigen Farbcode auslesen?

Anzeige
AW: beliebige Füllfarbe auf
18.03.2016 17:00:58
Steve
Dann nimm .Interior.Color statt .Interior.ColorIndex
Das einzige was hier stört ist jedoch dass wenn A1 keine Füllung hat es trotzdem als weiß zählt.
lg Steve

AW: beliebige Füllfarbe auf
18.03.2016 17:19:10
Harald
Steve,
Perfekt!
Da sowieso immer eine Farbe hinterlegt ist, spielt es keine Rolle, dass ohne Farbe weiß verwendet wird.
DANKE!!

104 Forumthreads zu ähnlichen Themen

Eintrag aus Textfeld in zelle übernehmen wenn leer
Benni

hallo,
kann mir jemand helfen, ich kenne mich mit VBA nicht wirklich gut aus.
ich möchte die Eingabe in einem Textfeld auf einer UserForm in eine Zelle auf dem Worksheets "Werte" übertragen. Problem bei der Sache ist, dass z.B. ich bei der Zelle A1 Anfange und wenn dort schon ein „Inhal...
24.06.2009 09:05:21
Thread-ID: 1083991
14 Beiträge
Anzeige
Hyperlink-Adresse aus Zelle übernehmen
werner

Hallo,
ich habe in einer Datei div. Userforms Buttons, die Hyperlinks zu internen Dateien und Web- _ Sites öffnen und gelegentlich aktualisiert werden müssen, z.B. Private Sub CBt34_Click() ActiveWorkbook.FollowHyperlink Address:="http://www.xxx.html", NewWindow:=True End Sub
Damit ic...
02.09.2009 17:43:19
Thread-ID: 1100160
3 Beiträge
Datum aus 2 Zellen in 1 Zelle übernehmen
gerhard

Hallo zusammen,
Bitte um VBA Hilfe!
In meiner Tabelle stehen in der Spalte H ein Datum im Format z.B in der Zelle H50 29.07.2008 in der Spalte I steht ebenfalls ein Datum im Format z.B in der Zelle I50 06.10.2008
Jetzt soll in der Spalte G in Zelle G50 automatisch folgender Eintrag...
11.09.2009 07:40:30
Thread-ID: 1101896
3 Beiträge
Anzeige
Zeilenhöhe aus Zelle bestimmter Sp übernehmen
Peter

Guten Tag
Ich habe eine Tabelle, in der in Spalte G ab Zeile 1 bis x steht, wieviel die Zeilenhöhe betragen soll. Nun möchte ich diese Zeilenhöhen mit Makro zuweisen und zwar zuerst die letzte Zeile mit Inhalt anwählen und dann rückwärts bis Zeile 1 abarbeiten.
Mit nachstehendem Code bi...
26.10.2009 14:49:49
Thread-ID: 1112247
3 Beiträge
Färben von Zellen | Herbers Excel-Forum
philipp schiess
Hallo Zusammen,
Ich bin an einer Jahresplanung am erstellen. Jetzt würde ich gerne mit einfachen befehlen die Zellen einfärben sobald ich die entsprechende Formel/Aufgabe eingebe.
Also wenn bsp t1 geschrieben wird=zelle rot; t2=zelle grün usw.
Ich hoffe Ihr könnt mir helfen
mit freu...
13.01.2010 06:54:04
Thread-ID: 1129308
3 Beiträge
Numerischen Teilstring aus Zelle übernehmen | Herbers Excel-Forum
RalfTh
Hilfe
Ich bin ein absoluter Anfänger und hatte schon die Lösung aber leider ist mir das Excel abgeraucht.
Ich finde die eingesetzte Funktion aber nicht mehr, es ist zum verzweifeln.
Hier also mein Problem:
Ich habe in einer Zelle einen String stehen der einen in "()" gefassten nume...
14.01.2010 13:41:47
Thread-ID: 1129897
7 Beiträge
Zellfarbe und Fontfarbe in ander Zelle übernehmen
Matthias.G.

Nabend Excelaner/inenn,
hab an Euch mal 2 Fragen,
ich übenehme mit :
If rc.Value = Cells(6, lx).Value Then
rc.Interior.ColorIndex = Cells(6, lx).Interior.ColorIndex
rc.Font.ColorIndex = Cells(6, lx).Font.ColorIndex
bSet = True
die Zellfarbe und Schriftfarbe , funzt j...
07.04.2010 00:45:45
Thread-ID: 1150382
2 Beiträge
Farbe von Schalter nach Zelleninhalt ändern
Schalter

Servus
ich wollte gern, das meine Schalter farbig hinterlegt wird, je nach Inhalt einer Zelle...
also wenn in Zelle A1 "1" steht soll mein Schalter rot sein, wenn "2" steht soll er grün sein...
geht das?
Danke
Timonski
09.06.2010 08:09:55
Thread-ID: 1160947
16 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
13
12
2
2
6
2
2
6
1
15
1
2
8
4
3
2
3
4
8
4
10
4
4
9
10