mikrocontroller.net

Forum: PC-Programmierung Hintergrundfarben bei Excel aendern


Autor: Gast (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Kann man bei Excel die Farben für Texte und Hintergrund der Zellen 
ändern?

Ginge das über VBA?

Am liebsten wäre mir eine eigene Palette. Die voreingestellten Farben 
sind Sch....

Autor: Simon K. (simon) Benutzerseite
Datum:

Bewertung
0 lesenswert
nicht lesenswert

Autor: Markus Meinhard (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
@Simon :
Wenn man nicht genug Ahnung hat um ne vernünftige Antwort zu geben , 
sollte man sich so Kommentare sparen. Es gibt auch andere Leute die in 
Foren nach Hilfe suchen...



    ' Feste Zelle ansprechen
    ' ~~~~~~~~~~~~~~~~~~~~~~
    ' Legt die Textfarbe von Tabellenblatt 1 Zelle A1 per Code fest
    Worksheets(1).Range("A1").Font.ColorIndex = 3
    ' Legt die Textfarbe der aktuellen aktiven Zelle per code fest
    Worksheets(1).Range("A1").Interior.ColorIndex = 1

    ' Aktiver Courser Ansprechen
    ' ~~~~~~~~~~~~~~~~~~~~~~~~~~
    ' Legt die Hintergundfarbe per Code fest
    ActiveCell.Interior.ColorIndex = 3
    ' Legt die Textfarbe der aktuellen aktiven Zelle per code fest
    ActiveCell.Font.ColorIndex = 1

    ' Ausgabe in einer Messagebox
    ' ~~~~~~~~~~~~~~~~~~~~~~~~~~~
    ' Gibt dir die Werte in einer Messagebox aus
    MsgBox "Hintergrundfarbindex : " & ActiveCell.Interior.ColorIndex & 
_ Chr(10) & "Textfarbindex : " & ActiveCell.Font.ColorIndex

Autor: Markus Meinhard (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Wenn du anstatt der Colorindex Eigenschaft die Color Eigenschaft 
änderst,    kannst du dir deine eigene Farbe über die RGB Funktion 
erstellen. Das sieht dann wie folgt aus :

  Worksheets(1).Range("A1").interior.Font.Color = RGB(255,128,0)
  ActiveCell.interior.Color = RGB(120,120,120)



  Die Parameter der RGB Funktion :
  RGB ( RotAnteil[0-255] , GrünAnteil[0-255] , BlauAnteil[0-255] )

  Aus der Mischung der 3 Farbwerte ergibt sich die Neue Farbe

Autor: Simon K. (simon) Benutzerseite
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Markus Meinhard wrote:
> @Simon :
> Wenn man nicht genug Ahnung hat um ne vernünftige Antwort zu geben ,
Woher weißt du denn, dass ich keine Ahnung habe? Was für eine 
Unterstellung. Tztztz.

> Es gibt auch andere Leute die in
> Foren nach Hilfe suchen...
Ich weiß, genau das kann man nämlich prima sehen, wenn man die oben 
verlinkte Google-Suche benutzt :P

Antwort schreiben

Die Angabe einer E-Mail-Adresse ist freiwillig. Wenn Sie automatisch per E-Mail über Antworten auf Ihren Beitrag informiert werden möchten, melden Sie sich bitte an.

Wichtige Regeln - erst lesen, dann posten!

  • Groß- und Kleinschreibung verwenden
  • Längeren Sourcecode nicht im Text einfügen, sondern als Dateianhang

Formatierung (mehr Informationen...)

  • [c]C-Code[/c]
  • [avrasm]AVR-Assembler-Code[/avrasm]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] - Link zu Artikel
  • Verweis auf anderen Beitrag einfügen: Rechtsklick auf Beitragstitel,
    "Adresse kopieren", und in den Text einfügen




Bild automatisch verkleinern, falls nötig
Bitte das JPG-Format nur für Fotos und Scans verwenden!
Zeichnungen und Screenshots im PNG- oder
GIF-Format hochladen. Siehe Bildformate.
Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt.
Bitte hier nur auf die ursprüngliche Frage antworten,
für neue Fragen einen neuen Beitrag erstellen.

Mit dem Abschicken bestätigst du, die Nutzungsbedingungen anzuerkennen.