Trazio sam po forumu, ali ne mogu naci :(:( znaci, treba mi dio koda, koji ce mi promjeniti boju celije, kad u nju unesem negativan broj. uspio sam to uraditi, ali preko button-a. znaci, kad kliknem na dugmic, on oboji sve celije sa neg. brojem u neku boju. meni treba, da se boja promjeni, kad unesem neg. broj, i pritisnem ENTER.
evo koda koji sam ja koristio u kombinaciji sa button-om:
Unaprijed hvala na svakoj pomoci!
evo koda koji sam ja koristio u kombinaciji sa button-om:
Code:
Private Sub CommandButton1_Click()
Dim celija As Object
For Each celija In Range("c3:c500")
If celija.Value < 0 Then
celija.Interior.ColorIndex = 45
Else
celija.Interior.ColorIndex = 0
End If
Next
End Sub
Private Sub CommandButton1_Click()
Dim celija As Object
For Each celija In Range("c3:c500")
If celija.Value < 0 Then
celija.Interior.ColorIndex = 45
Else
celija.Interior.ColorIndex = 0
End If
Next
End Sub
Unaprijed hvala na svakoj pomoci!
Potpis
MyCoNfa:
CPU: AMD Phenom II X4 965 3,4GHz BOX
Maticna:Asus M4A89GTD PRO
RAM: Corsair 4x2GB 1600MHz, 9-9-9-24
Grafa: Diamond ATI 5870 1GB
HDD:3xWD 320GB AAKS, stripe raid
DVD/RW:LG,SATA
SilverStone SST-ST50F 500W
CoolerMaster CM690
LG 24" 2453TQ-PF
Tastatura A4Tech X7 G800
Stakor: A4Tech X7-755FS
CPU: AMD Phenom II X4 965 3,4GHz BOX
Maticna:Asus M4A89GTD PRO
RAM: Corsair 4x2GB 1600MHz, 9-9-9-24
Grafa: Diamond ATI 5870 1GB
HDD:3xWD 320GB AAKS, stripe raid
DVD/RW:LG,SATA
SilverStone SST-ST50F 500W
CoolerMaster CM690
LG 24" 2453TQ-PF
Tastatura A4Tech X7 G800
Stakor: A4Tech X7-755FS
