Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
568to572
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
568to572
568to572
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bedingte Formatierung

Bedingte Formatierung
17.02.2005 06:56:35
Erich
Hallo EXCEL-Freunde,
ich habe die bedingte Formatierung mit allen drei verschiedenen Möglichkeiten
bereits im Einsatz.
Jetzt benötige ich eine vierte per VBA; dabei geht es darum, dass ich in der Spalte A
die Kalendertage 2005 aufsteigend per Formel hinterlegt habe - immer nur
die Tage Montag bis Samstag mit folgender Formel (der Sonntag wird immer ausgelassen):
Keno
 A
531.12.04
601.01.05
703.01.05
Formeln der Tabelle
A6 : =WENN(WOCHENTAG(A5+1)=1;A5+2;A5+1)
A7 : =WENN(WOCHENTAG(A6+1)=1;A6+2;A6+1)
 
Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  
Nun möchte ich bei jeder Zeile die in Spalte A den Samstag stehen hat,
die Zeile von A bis K mit einer gestrichelten Linie am unteren Rand darstellen.
Dies soll als optische Trennung für das Ende der Woche gelten.
Besten Dank für eine Hilfe!
mfg
Erich
http://www.toolex.de

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bedingte Formatierung
=Peter=
Hallo Erich,
VBA ist nicht mein Ding. Deswegen von mir ein anderer Tipp:
Du solltest dir mal das Addin CFPlus ansehen. Es bildet die Excel-Funktionalität der bedingten Formatierung nach. Es ist darauf ausgelegt mehr als 3 Bedingungen zur Verfügung zu stellen sowie alle Formatmöglichkeiten von Excel zu unterstützen.
www.xldynamic.com/source/xld.CFPlus.Download.html
HTH
Gruss
Peter
AW: Bedingte Formatierung
Erich
Hallo Peter,
danke für den Tipp; schaut interessant aus.
Vorläufig bleibe ich noch auf der Suche nach einer VBA-Lösung.
mfg
Erich
http://www.toolex.de
Anzeige
AW: Bedingte Formatierung
Kurt
hi,
eventuell so:
Sub test() For zaehler = 6 To Cells(65536, 1).End(xlUp).Row If WeekDay(Cells(zaehler, 1), vbSaturday) = 1 Then With Range(Cells(zaehler, 1), Cells(zaehler, 11)).Borders(xlEdgeBottom) .LineStyle = xlDot .Weight = xlThin .ColorIndex = xlAutomatic End With End If Next End Sub
...und Tschüss Kurt
AW: Bedingte Formatierung
Erich
Hallo Kurt,
super - das wars. Besten Dank!!
mfg
Erich
http://www.toolex.de

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige