Hallo,
die bed. Formatierung für ein Textfeld geht ja nur für 3 Farben. Gibt es in VBA die Möglichkeit das betreffende Textfeld für mehrere Farben zu schreiben. Wenn ja würde ich mich freuen wenn ihr mir dabei helfen würdet.
Im Textfeld können vier Texte stehen.
- In Arbeit (gefärbt in grün)
- Gesperrt (gefärbt in rot)
- Messen (gefärbt in gelb)
- MFU (gefärbt in blau)
mfg Ludwig
Hi,
siehe z.B. den ersten Link zu alten Beiträgen unter Deinem Beitrag => Nein, geht nicht
Harald
Hallo,
ja ich weis. Für drei Farben funktioniert es wunderbar.
Ich bräuchte aber noch eine vierte Farbe dazu.
Müsste doch gehen in Excell gehts ja auch..
Aus einer Excel Tabelle:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B8:X39")) Is Nothing Then
Exit Sub
Else
If Target.Value = "Urlaub" Then
Target.Interior.ColorIndex = 3
End
End If
If Target.Value = "Freischicht" Then
Target.Interior.ColorIndex = 8
End
End If
If Target.Value = "Schulung" Then
Target.Interior.ColorIndex = 4
End
End If
If Target.Value = "Krank" Then
Target.Interior.ColorIndex = 16
End
End If
With Selection.Interior
.ColorIndex = xlColorIndexNone
End With
End If
End Sub
Hallo,
Du kannst Excel nicht mit Access vergleichen. In Excel kannst Du einzelne Zellen ansprechen, in Access wird immer die komplette Spalte angesprochen. Den Excel Code auf Access umgeschrieben würde immer die komplette Spalte färben.
Auch mit VBA musst Du zum Färben die VBA Befehle der bedingten Formatierung verwenden, sodass Du auch mit VBA auf 3 Farben beschränkt bist.
Welche Access Version verwendest Du?
Ab Access2007 hat die bedingte Formatierung mehr Möglichkeiten, 50 wenn ich recht weis.
Übrigens mit einem Bericht kannst Du mehr Farben realisieren, sogar ohne die bedingte Formatierung.
Hi,
wenn Du Dich vom Begriff "Bedingte Formatierung" löst, ist auch in access eine nahzu beliebige Vielfalt an Farben möglich, sofern Du die Daten in der Formularsicht (also keine Tabelle, kein Endlosform) anzeigst.
Das geht dann ähnlich wie in Excel und Ausnutzung der .backcolor-Eigenschaft.
Die oben angezeigt If-Konstruktion lässt sich übrigens eleganter darstellen:
Select case Target.Value ' warum muss hier eigentlich.value stehen???
case "Urlaub"
...
case "Freischicht"
...
end select
Harald
Hallo,
ZitatIm Textfeld können vier Texte stehen.
- In Arbeit (gefärbt in grün)
- Gesperrt (gefärbt in rot)
- Messen (gefärbt in gelb)
- MFU (gefärbt in blau)
4 verschiedene Zustände sind mit der Bedingten Formatierung doch realisierbar, wenn der erste Zustand z. B. die Grundformatierung des Textfeldes darstellt....
Hallo,
die Standardformatierung muss neutral bleiben, da ich noch Texte wie "Offen" und "Nacharbeit" habe. Hier soll das Feld weiß bleiben.
mfg Ludwig
Hallo,
und soll das jetzt in einem normalen Formular oder in einem Endlosformular passieren, denn mit einem normalen Formular kannst Du mehrere Farben realisieren.
Hallo,
ich habe ein Geteiltes Formular. Mit den drei Farben läuft ja alles wunderbar
Hallo,
wenn Du ein geteiltes Formular hast, ist das doch eine neuere Access Version.
Meine Frage von weiter oben nach der Version hast Du nicht beantwortet.
Zitat von: MzKlMu am Juli 11, 2013, 19:07:09
Welche Access Version verwendest Du?
Oh Entschuldigung,
ich benutze Access 2007
Hallo,
aber dann hast Du doch mehr als 3 Möglichkeiten.
Hallo,
dann bin ich anscheinend völlig blind. In der bed. Formatierung gibt es doch nur 1 Standardformatierung und zum hinzufügen noch drei weitere Möglichkeiten. Oder gibt es noch was anderes, dass ich noch nicht gefunden habe?
Bitte klärt mich auf.
MfG Ludwig
Hi,
zum Thema Anzahl bedingter Formatierungen noch mal der Hinweis auf den ersten Beitrag bei den unten aufgeführten früheren Beiträgen:
http://www.access-o-mania.de/forum/index.php?topic=14746.0
und dort die Antwort 3
Harald