Home |
Search |
Today's Posts |
#2
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Try this:
Sub coupydown() For i = 1 To 5 k = 0 For j = 1 To 4 If Cells(j, i).Font.ColorIndex = xlAutomatic Then k = k + 1 End If Next MsgBox (k) If k = 4 Then Cells(5, i).Value = Cells(4, i).Value End If Next End Sub -- Gary''s Student - gsnu200735 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Check dates in spreadsheet against expiry years column and change colour | Excel Worksheet Functions | |||
Colour cell when number changes | Excel Worksheet Functions | |||
change a cell background colour to my own RGB colour requirements | Excel Discussion (Misc queries) | |||
Change cell Colour when a number of days have been passed | Excel Discussion (Misc queries) | |||
Change colour of Text if number in cell exceed limit | Excel Worksheet Functions |