Witam potrzebuje pomocy mam potrzebę zrobienia VBA w excelu takiego zadania
-pola A1:K20 jako walutowe 2 miejsca po przecinku
-ujemne liczby cyfry jako brązkowy kolor
-przycisk wlutowy na pasku szybkiego dostępu
Na tą chwile mam coś takiego jak niżej
Sub ujemne()
Dim kolumna As Long, wiersz As Long
For wiersz = 1 To 10
For kolumna = 1 To 10
If Cells(wiersz, kolumna).Value < 0 Then
Cells(wiersz, kolumna).Interior.ColorIndex = 6
Else
Cells(wiersz, kolumna).Interior.ColorIndex = xlNone
End If
Next kolumna
Next wiersz
End Sub