Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
720to724
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
720to724
720to724
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

rahmen bei bedingter formatierung

rahmen bei bedingter formatierung
17.01.2006 07:49:19
frank
hallo zusammen,
folgendes problem: ist es möglich die linienstärke bei der bedingten formatierung zu ändern? bitte schaut in meine beispieltabelle die roten linien sollten nicht rot sondern nur stärker sein...
https://www.herber.de/bbs/user/30114.xls
vielen dank im vorraus
gruß frank
ps: falls jemand ne vba lösung dafür hätte wäre ich auch nicht böse ;) (der level zwischen vba nein und vba gut ist ja leider nicht vorhanden)

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: rahmen bei bedingter formatierung
17.01.2006 10:16:28
Harald
Moin Frank,
mit bedingter Formatierung nicht machbar.
Hier ne Schnellschuß-Lösung

Sub linien()
Dim i As Long
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
If IsEmpty(Cells(i + 1, 1)) Then GoTo weiter
If Year(Cells(i + 1, 1)) <> Year(Cells(i, 1)) Then
With Range(Cells(i, 1), Cells(i, 5)).Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Range(Cells(i, 1), Cells(i, 5)).Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThick
.ColorIndex = xlAutomatic
End With
Else
With Range(Cells(i, 1), Cells(i, 5)).Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
End If
weiter:
Next i
End Sub

Gruss Harald
Anzeige
AW: rahmen bei bedingter formatierung
17.01.2006 10:27:40
frank
hallo harald,
danke erstmal mal schauen was sich damit machen lässt ich ;)
gruß frank
Viel Erfolg owT
17.01.2006 10:43:10
Harald
Gruss Harald

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige