Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: StefKe am März 15, 2018, 10:55:17 Vormittag

Titel: Office 2016 bedingte Formatierung wird verschoben
Beitrag von: StefKe am März 15, 2018, 10:55:17 Vormittag
Hallochen allerseits, vielleicht weiß jemand Rat. Problem: in Tabelle "April 2018" wird per Vba die bedingte  Formatierung dem Bereich B6:B35 zugewiesen, ausgelesen und im Direktfenster ausgegeben.
Aber im Excel-Tabellenblatt ist eine völlig andere Formel eingetragen. Wie kann das sein? Wo kann der Fehler liegen?


(http://schleifchen.bplaced.net/bed.Format.png)

Danke Stefan
Titel: Antw:Office 2016 bedingte Formatierung wird verschoben
Beitrag von: DL am März 15, 2018, 11:22:49 Vormittag
Stefan,


wie so häufig sitzt das Problem vor der Tastatur.


Klicke mal auf "Regel bearbeiten".

Titel: Antw:Office 2016 bedingte Formatierung wird verschoben
Beitrag von: StefKe am März 15, 2018, 12:16:58 Nachmittag
Ja - das ist eine Möglichkeit. Aber die Formatierung wird mit:

'alte Formatierung entfernen und neu definieren:
    .Range(Cells(6, 2), Cells(intEinfuegeEnde, 2)).FormatConditions.Delete
    .Range(Cells(6, 2), Cells(intEinfuegeEnde, 2)).FormatConditions.Add Type:=xlExpression, Formula1:="=($D6=1)"
    .Range(Cells(6, 2), Cells(intEinfuegeEnde, 2)).FormatConditions(1).Interior.Color = RGB(28, 134, 238)
    .Range(Cells(6, 2), Cells(intEinfuegeEnde, 2)).FormatConditions.Add Type:=xlExpression, Formula1:="= WOCHENTAG($B6;2) > 6"
    .Range(Cells(6, 2), Cells(intEinfuegeEnde, 2)).FormatConditions(2).Interior.Color = RGB(142, 229, 238)

eingefügt. Warum definiert Excel andere Zellbezüge, wie kann ich den Code schreiben damit das nicht passiert?
Titel: Antw:Office 2016 bedingte Formatierung wird verschoben
Beitrag von: DL am März 15, 2018, 13:03:54 Nachmittag
Da muss ich passen.

Titel: Antw:Office 2016 bedingte Formatierung wird verschoben
Beitrag von: lupo1 am März 15, 2018, 18:18:07 Nachmittag
Möglicherweise hat es mit einem ziemlich gravierenden Bug der bedF unter xl365
(und damit evtl. auch bei xl2016) zu tun, den ich hier beschrieben habe:

http://www.online-excel.de/fom/fo_read.php?f=1&bzh=91907&h=91896#a123x (http://www.online-excel.de/fom/fo_read.php?f=1&bzh=91907&h=91896#a123x)

Es betrifft per VBA erstellte bedF.

Während es bei xl365 jederzeit behoben sein könnte, bliebe einem bei xl2016 (falls
der Fehler dort besteht) nur die Hoffnung, dass es mit einem Servicepack erledigt wird.