Formatierung bei arrDaten

Forumthread: Formatierung bei arrDaten
3 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Formatierung bei arrDaten

16.01.2017 09:02:24

Gregor

Hallo
Mit folgendem Code lese ich Daten in die Variable arrDaten ein:
arrDaten(3, n) = Format(DateSerial(Jahr, Monat, Start), "DD/ MM YYYY ") & Kürzel
Der Kürzel entspricht dem zuvor je nach Datum eruiertem Kürzel Mo, Di, usw. Statt des Kürzels möchte ich aber die Zellen Sa und So mit je einer Formatierung Interior.Color versehen. Ist das möglich und wann wie?
Danke und Gruss
Gregor

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

nein

16.01.2017 19:00:24

Michael
AW: nein

17.01.2017 08:52:50

Gregor
gerne

17.01.2017 15:09:05

Michael

nein

16.01.2017 19:00:24

Michael

Hi Gregor,
Arrays enthalten NUR Daten, keine Formatierungen.
Das geht denn nur mit range("C" & n).interior.color=vbgreen, wobei Du den Spaltenbuchstaben halt entsprechend anpaßt und im range mit n+/- einem Wert arbeiten kannst, falls das Array nicht in Zeile 1 beginnt.
Um die Zellenzugriffe zu minimieren, würde ich denn nur nach Sa suchen und immer zwei Tage färben:
if Kürzel="Sa" then range("C" & n).resize(2).interior.color=vbgreen
Schöne Grüße,
Michael

AW: nein

17.01.2017 08:52:50

Gregor

Hallo Michael
Ok, dann löse ich das mit deinem Vorschlag, vielen Dank.
Gruss Gregor

gerne

17.01.2017 15:09:05

Michael

Hi,
danke für die Rückmeldung und Gruß zurück,
Michael