Pirmiausiai susitvarkyk datų stulpelį, ten pas Tamstelę datos surašytos kaip
tekstas, na o tada...
Sub Spalvos()
GData = Cells(1, 11)
IDX = 2
Do
If Cells(IDX, 1) = Empty Then Exit Do
If GData > Cells(IDX, 5) + Cells(IDX, 6) Then
Range(Cells(IDX, 1), Cells(IDX, 8)).Interior.ColorIndex = 9
End If
IDX = IDX + 1
Loop
End Sub
"b2b" <b2b@gmail.com> parašė naujienų
news:iceehc$84g$1@trimpas.omnitel.net...
> Sveigi gudrociai :)
>
> gal kas pades, pasufleruos kaip pasidaryti excelyje lenteles eiluciu
> spalvinima pagal tam tikros joje esancios celes reiksme arba tam tikra
> formule ? Pridedu xls faila. Tikiuosi suprasite ko noriu.
>