< návrat zpět

MS Excel


Téma: VBA podmíněné formátování, písmo + pozadí rss

Zaslal/a 20.4.2021 9:35

Merlin99Zdravim vsechny
chci se zeptat jestli nekdo poradi jak sloucit tyto dve podminky podmineneho formatovani do jedne, nijak se mi to nepodarilo.. viz příloha

.Range("A2:A" & MaxRadek & "").FormatConditions.Add(Type:=xlExpression, Formula1:="=$A2=1").Font.ColorIndex = 33

.Range("A2:A" & MaxRadek & "").FormatConditions.Add(Type:=xlExpression, Formula1:="=$A2=1").Interior.ColorIndex = 6

Příloha: rar50492_format.rar (13kB, staženo 12x)
Zaslat odpověď >

#050500
Stalker
Myslel si to takto: ???
Private Sub Workbook_Open()
Dim MaxRadek As Long
With List1
MaxRadek = .Cells(Rows.Count, "A").End(xlUp).Row

.Cells.FormatConditions.Delete
With .Range("A2:A" & MaxRadek & "").FormatConditions.Add(Type:=xlExpression, Formula1:="=$A2=1")
.Font.ColorIndex = 33
.Interior.ColorIndex = 6
End With
End With
End Sub

Příloha: rar50500_format.rar (12kB, staženo 15x)
citovat
#050502
Merlin99
Stalker
Perfektní, DĚKUJI moc 1 5citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Hromadné přepsání

elninoslov • 24.5. 10:29

Hromadné přepsání

Nomi • 24.5. 8:32

Index - každý rok začít od 1 Power Query

Alfan • 23.5. 9:17

nepřímý odkaz

elninoslov • 23.5. 0:00

nepřímý odkaz

bordov • 22.5. 18:35

vrácené hodnoty

Anonym • 22.5. 15:46

vrácené hodnoty

Anonym • 22.5. 15:45