Zellen bei Änderung automatisch farblich formatieren

[DieMarie]

Hallo zusammen,

ich habe ein Arbeitsblatt auf dem hunderte Werte stehen. 
Diese Werte sind alle auf eine Datenquelle verlinkt. 

Nun müssen in dem Arbeitsblatt an bestimmten Stellen die Verlinkungen mit manuell korrigierten Werten überschrieben werden.

Ich möchte dass die Zellen die manuell geändert wurden automatisch farblich markiert werden. 
Ich hatte schon mal gesehen dass das so funktioniert, ich weiß aber nicht wie.

[Fennek]

Hallo,

teste mal, ob das so gehen könnte:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.CountLarge > 1 Then Exit Sub
Target.Interior.Color = vbYellow
End Sub

Der code gehört ins Klassen-Modul des Sheets.

mfg

[HKindler]

Hi,

oder als bed.Form mit der Formel =NICHT(ISTFORMEL(A1)) wobei A1 die aktive Zelle des gewünschten Bereichs ist. Dies ist vor allem dann hilfreich, wenn schon Links ersetzt wurden.

[DieMarie]

Danke euch Beiden. 

HKindler ohne VBA wäre natürlich optimal. 
Allerdings verstehe ich den Bezug auf A1 noch nicht so ganz. 

Sagen wir mal ich habe von A3 bis F3 in jeder Zelle einen Verweis auf ein anderes Blatt (aber dort natürlich jeweils auf unterschiedliche Zellen). 
Was müsste dann in A1 stehen?


In A3 steht z.B. =Datenquelle!B15
In B3 steht z.B. =Datenquelle!C15

[DieMarie]

Habe es hinbekommen. Die bedingte Formatierung reicht aus um die Zellen zu markieren die manuell überschrieben werden. 

Vielen Dank :)