Collapse column

Autor Thema: Office 2016 bedingte Formatierung wird verschoben  (Gelesen 820 mal)

Offline StefKe

  • Full Member
  • ***
  • Beiträge: 100
    • Profil anzeigen
  • Office-KnowHow: Anfänger
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2016
Office 2016 bedingte Formatierung wird verschoben
« 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?




Danke Stefan

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.

Offline DL

  • Hero Member
  • *****
  • Beiträge: 808
  • {Irrtum / Versuch * Glaskugel}
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2016
Antw:Office 2016 bedingte Formatierung wird verschoben
« Antwort #1 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".

Wir sehen uns!
... Detlef
Eine Mustertabelle hilft beim Helfen.
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()

Offline StefKe

  • Full Member
  • ***
  • Beiträge: 100
    • Profil anzeigen
  • Office-KnowHow: Anfänger
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2016
Antw:Office 2016 bedingte Formatierung wird verschoben
« Antwort #2 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?

Offline DL

  • Hero Member
  • *****
  • Beiträge: 808
  • {Irrtum / Versuch * Glaskugel}
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2016
Antw:Office 2016 bedingte Formatierung wird verschoben
« Antwort #3 am: März 15, 2018, 13:03:54 Nachmittag »
Da muss ich passen.

Wir sehen uns!
... Detlef
Eine Mustertabelle hilft beim Helfen.
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()

Offline lupo1

  • Sr. Member
  • ****
  • Beiträge: 250
    • Profil anzeigen
  • Office-KnowHow: Anfänger
  • VBA-KnowHow- : Ohne
  • Version [Office] : Office 2010
Antw:Office 2016 bedingte Formatierung wird verschoben
« Antwort #4 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

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.
« Letzte Änderung: März 15, 2018, 18:20:23 Nachmittag von lupo1 »
MfG Lupo1 (und natürlich gern auch Hallo!)

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.