Microsoft Excel

Herbers Excel/VBA-Archiv

Hintergrundfarbe

Betrifft: Hintergrundfarbe
von: Homer
Geschrieben am: 23.04.2003 - 09:44:00

Habe folgendes Problem:

Bekomme zwar die zugewiesene Hintergrundfarbe bei Eingabe eines bestimmmten Buchstaben, aber wenn ich diesen Buchstaben wieder lösche bleibt diese Farbe in der Zelle stehen.

Kann man dies ändern so das Buchstabe weg auch die Hintergrundfarbe weg ist???

________________________________________________________________

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column >= 3 And Target.Column <= 39 And Target.Row >= 17 And Target.Row <= 83 And (Target.Row - 11) / 6 = WorksheetFunction.Round((Target.Row - 11) / 6, 0) Then
Target.Interior.ColorIndex = xlNone
If IsEmpty(Target) = False Then
Target = UCase(Target)
If Target = "T" Then Target.Interior.ColorIndex = 3
If Target = "N" Then Target.Interior.ColorIndex = 4
If Target = "TV" Then Target.Interior.ColorIndex = 5
If Target = "NV" Then Target.Interior.ColorIndex = 6
If Target = "U" Then Target.Interior.ColorIndex = 7
If Target = "L" Then Target.Interior.ColorIndex = 8
If Target = "K" Then Target.Interior.ColorIndex = 9
If Target = "SP" Then Target.Interior.ColorIndex = 10
End If
End If
End Sub


Gruss Homer

  

Re: Hintergrundfarbe
von: Ingo
Geschrieben am: 23.04.2003 - 09:57:41

Hallo Homer,

bin mir zwar nicht sicher, aber versuch doch mal vor dem ersten endif folgende zeile einzufügen:

else target.interior.colorindex=1

(1 sollte schwarz sein, sonst entsprechend ändern)

Gruß Ingo

  

Re: Hintergrundfarbe
von: Homer
Geschrieben am: 23.04.2003 - 10:11:24

Ne, da tut sich nichts. Bleibt alles beim alten.


Gruss Homer

  

Re: Hintergrundfarbe
von: Bertram
Geschrieben am: 23.04.2003 - 10:35:28

Hallo Homer,

bei mir funktioniert dein Makro. Wo liegt dein Problem?

Gruß
Bertram

  

Re: Hintergrundfarbe
von: Homer
Geschrieben am: 23.04.2003 - 11:02:52

Gehen bei dir die Farben wieder weg bei Löschung der Buchstaben?


Gruss Homer

  

Re: Hintergrundfarbe
von: Bertram
Geschrieben am: 23.04.2003 - 11:08:14

Ja.

  

Re: Hintergrundfarbe
von: Homer
Geschrieben am: 23.04.2003 - 11:32:24

Komisch, habs eben nochmal gemacht. Hurra jetzt funzt es.


Danke


Gruss Homer

 

Beiträge aus den Excel-Beispielen zum Thema "Hintergrundfarbe"