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

Ändern der zellefarbe wenn Formel hinterlegt

Forumthread: Ändern der zellefarbe wenn Formel hinterlegt

Ändern der zellefarbe wenn Formel hinterlegt
28.04.2013 10:53:23
Marko
Hallo,
ich bin gerade dabei eine verwirrendes Rechenblatt zu erstellen.
Jezt komt es immer wieder vor das ich in Zellen was eintrage, wo eigentlich eine Formel steht.
Kann ich irgendwie eine Zelle gelb (oder anders) machen sobald in einer Zelle eine Formel steht?
Ich weis ich könte die Zelle auch Sperren, aber das macht mir beim erstellen des Blatts zu viel aufwand jedesmal die zelle zu sperren wenn ich was ändern will.
in vorraus besten Dank

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ändern der zellefarbe wenn Formel hinterlegt
28.04.2013 11:22:02
Heribert
Hallo Marko,
ich habe es bei mir mit VBA gelöst (Office 2003)
Habe mir aber keine Gedanken darüber gemacht, was ist mit evtl. vorhandenen gewollten Einfärbungen
die zB über bed. Formatierung oder VBA gesetzt werden?
Die könnten dann verloren gehen. Private Sub Worksheet_Activate() Dim fzelle As Range For Each fzelle In ActiveSheet.UsedRange If fzelle.HasFormula Then fzelle.Interior.ColorIndex = 6 Else fzelle.Interior.ColorIndex = xlNone End If Next End Sub

Anzeige
AW: Ändern der zellefarbe wenn Formel hinterlegt
28.04.2013 11:34:14
Heribert
oder evtl. so
mit Blattschutz / Zellschutz über Formelprüfung 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim fzelle As Range
ActiveSheet.Unprotect Password = ""
For Each fzelle In ActiveSheet.UsedRange
If fzelle.HasFormula Then
fzelle.Locked = True
Else
fzelle.Interior.ColorIndex = xlNone
fzelle.Locked = False
End If
Next
ActiveSheet.Protect Password = ""
End Sub

Die einfärbung kann natürlich wegbleiben
Gruss
Heribert

Anzeige
AW: Ändern der zellefarbe wenn Formel hinterlegt
28.04.2013 11:35:54
Heribert
korrektur

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim fzelle As Range
ActiveSheet.Unprotect Password = ""
For Each fzelle In ActiveSheet.UsedRange
If fzelle.HasFormula Then
fzelle.Locked = True
Else
fzelle.Locked = False
End If
Next
ActiveSheet.Protect Password = ""
End Sub

Anzeige
AW: Ändern der zellefarbe wenn Formel hinterlegt
28.04.2013 11:38:03
Marko
Danke,
genau das suchte ich.
zur Info
Vorherige einfärbungen gehen in der tat verloren

AW: Ändern der zellefarbe wenn Formel hinterlegt
28.04.2013 11:39:12
Heribert
Danke für die Rückmeldung,
Heribert

Aber nicht BedingtFormatFarben! Gruß owT
29.04.2013 02:06:26
Luc:-?
:-?

Anzeige
mit ZELLE.ZUORDNEN()
28.04.2013 11:57:53
Christian
Hallo Marko,
alternativ auch so:
 D
13
2 
3 
4text

Formeln der Tabelle
ZelleFormel
D1=B1

Bedingte Formatierungen der Tabelle
ZelleNr.: / BedingungFormat
D11. / Formel ist =formel_1Abc
Namen in Formeln
ZelleNameBezieht sich auf
D1formel_1=ZELLE.ZUORDNEN(48; test!D1)
Namen verstehen


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
MfG Christian
Anzeige
;

Forumthreads zu verwandten Themen

VBA Zelle einfärben
Tom

Hi Leute,
ich weis zwar wie man ne Zelle einfärbt leider nicht beim objektorientierter Schreibweise kann mir da vll. jemand weiterhelfen?
Es soll einfach die Zeile Grün werden die Kopiert wurde, bzw. die Zelle. Private Sub CSearch_Click() Dim Dat1, Dat2, TB1_Comp, TB2_Comp, TB1_Paste, T...
03.08.2009 08:38:53
Thread-ID: 1093112
2 Beiträge
VBA Zelle einfärben
Tom

Hi Leute,
ich weis zwar wie man ne Zelle einfärbt leider nicht beim objektorientierter Schreibweise kann mir da vll. jemand weiterhelfen?
Es soll einfach die Zeile Grün werden die Kopiert wurde, bzw. die Zelle. Private Sub CSearch_Click() Dim Dat1, Dat2, TB1_Comp, TB2_Comp, TB1_Paste, T...
03.08.2009 08:42:25
Thread-ID: 1093113
4 Beiträge
Zellenhintergrundfarbe per Auswahl ändern ?
Werner

Hallo,
ich möchte folgendes erreichen:
In der Zelle A1 soll zukünftig der Text stehen "Bitte Thema auswählen", sobald man auf diese Zelle klickt soll so ein kleines Auswahlmenü aufgehen in dem nun folgnde Auswahl erscheint:
1.: QUALITÄT - gelb - Wird dieser Eintrag ausgewählt so sol...
26.02.2010 12:31:53
Thread-ID: 1141730
5 Beiträge
Anzeige
VBA: Gültigkeit für eine Zelle zuweisen
André

Moin zusammen,
ich möchte per VBA einer Zelle eine Gültigkeit zuweisen, und zwar eine Liste von Werten, die dann per Dropdown ausgewählt werden können.
Um den hierzu notwendigen Code zu erhalten, habe ich die Gültigkeit manuell zugewiesen und per Makrorekorder aufzeichnen lassen. Dabei...
22.03.2010 14:10:36
Thread-ID: 1147568
3 Beiträge
Anzeige
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
Zelle farbig ausfüllen über Formel / bedingte Form
Jim

Hallo Forum,
ich habe eien Frage bzgl. einer Zellformatierung.
Mit welcher Formel oder bedingten Formatierung kann ich einer Zelle eine Füllfarbe unter Randbedingungen zuweisen
Z.B steht in der Zelle A1 die Zahl 1, 2, 3, 4 oder 5. Nun soll die Zelle A2 farbig sein (ohne das ich ein...
22.07.2010 22:07:47
Thread-ID: 1168460
3 Beiträge
Zellenfarbe ändern
Kurt

Guten Abend,
ich möchte nur die Zellenfarbe der Spalte B nach Eingabe einer Zahl
ändern und zwar in Rot.
Die Farbe ist vorher Blau.
mfg Kurt B
14.09.2010 22:19:53
Thread-ID: 1177597
6 Beiträge
VBA Zellen je nach Inhalt einfärben
jens

Hallo Excel-Profis,
ich habe ein Makro das mir einen Bereich durchgeht und die Zellen je nach inhalt färbt:
Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) Sheets("Reservierung (3)").Select Dim RaBereich As Range, RaZelle As Range Set RaBereich = Range("B8:P48") 'Set RaBereic...
28.10.2010 12:00:06
Thread-ID: 1184257
7 Beiträge
Formatieren von Zellen per VBA
Zellen

Guten Tag
habe bereits eine Ergänzungsfrage zu einem Projekt bei welchem mir hier via Forum schon sehr sehr gut geholfen wurde....
und zwar:
mittels folgendem Code schreibe ich in eine Spalte ein Datum:
Cells(j, 10).Value = CDate(MyDatStrg)
Wie müsste ich diese Zeile erweite...
07.12.2010 10:53:17
Thread-ID: 1190357
18 Beiträge
Zellen einfärben per VBA
Heinz

Guten morgen,im Forum
Ich hätte bitte gerne ein Makro.
Wenn zB. A3"" das in E4+F4 die Zelle gelb eingefärbt wird.
Also immer eine Zelle in E+F darunter, wenn Spalte A ungleich "".
Angefangen von A5 bis A1000
Mit bed.Formatierung würde die Arbeitsmappe einfach zu groß.
Kö...
29.03.2011 09:10:20
Thread-ID: 1208020
5 Beiträge
Anzeige
Zellen färben VBA
sven

Hi,
ich habe eine Userform mit einer Combobox.
Die Userform wird durch Doppelklick einer Zelle aufgerufen
Die Einträge in der Combobox sind : Entladung1,Entladung2,Entladung3,Entladung4
Wenn jetzt zum Beispiel Entladung4 gewählt wurde, soll die Zelle, aus der die Userform herbei...
31.05.2011 18:03:59
Thread-ID: 1216908
8 Beiträge
Anzeige
Vba zellen mit bestimmten Inhalt formatieren
thomas

Hallo Leute
Ich würde gerne bestimmte Zellen per VBA so formatieren, dass bei einem bestimmten Inhalt ein Zellbereich mit einer Dicken Linie oben bzw. unten formatiert wird.
Ich habe eine Excel-Datei in der per Makro 2 Zeilen mit den Wörtern "Zwischensumme" und "Übertrag" an jedem Seit...
05.09.2011 07:33:20
Thread-ID: 1228619
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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