Thema Datum  Von Nutzer Rating
Antwort
Rot Einfärbung des Hinterrunds Hilfe!!!!!
 21.01.2008 11:14:02 Th3last
NotSolved
22.01.2008 10:21:37 Holger
NotSolved

Ansicht des Beitrags:
Von:
Th3last		 Datum:
21.01.2008 11:14:02		 Views:
1823		 Rating:
     
Antwort:
  Ja
Thema:
Einfärbung des Hinterrunds Hilfe!!!!!
Hallo......

Ich habe ein Dringendes Problem und hoffe das mir jemand helfen kann.
Hier mein Code:

Option Explicit

Dim running
Dim Dings As Range

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Not running Then
running = True

For Each Dings In Excel.Application.Selection
' Dings.Value = Target.Value

With Dings
Select Case .Value
Case "ABB"
.Interior.ColorIndex = 53
Case "SNR"
.Interior.ColorIndex = 6
Case "IRB"
.Interior.ColorIndex = 45
Case "LBK"
.Interior.ColorIndex = 39
Case "IBK"
.Interior.ColorIndex = 37
Case "BRS"
.Interior.ColorIndex = 53
Case "FBB"
.Interior.ColorIndex = 41
Case ""
.Interior.ColorIndex = xlColorIndexNone
End Select
End With
Next
running = False
End If
End Sub

Ich gebe die Daten anhand einer Liste aus, wenn eines dieser Inhalte ausgewählt wurde, färbt sich der Hintergrund. Das funktioniert aber nur bei BRS und LBK.
Wiso nur bei diesen 2....Ich sehe keine Unterschiede..
Hat jemand eine Idee?
Gruss
Th3last

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Einfärbung des Hinterrunds Hilfe!!!!!
 21.01.2008 11:14:02 Th3last
NotSolved
22.01.2008 10:21:37 Holger
NotSolved