Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Overflow Error
Any ideas, please?
The sub below stops with Run-time error '6': Overflow Sub ColourIt() NumOfRows = Cells(Rows.Count, 1).End(xlUp).Row Dim OnHand As Integer Dim ATS As Integer For CurrentRow = 2 To NumOfRows OnHand = ActiveSheet.Cells(CurrentRow, 6) ATS = ActiveSheet.Cells(CurrentRow, 7) If OnHand + ATS1 = 0 Then Cells(CurrentRow, 2).Interior.ColorIndex = 22 End If Next End Sub -- Thanks & Best Regards |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Overflow error | Excel Programming | |||
Overflow error, need help | Excel Programming | |||
Overflow error | Excel Programming | |||
Overflow Error | Excel Programming | |||
Help! Overflow Error 6 | Excel Programming |