Trying to understand a piece of code in VBA [excel]?

Hi everyone,

A friend of mine sent me this code and I need to be able to describe it to my peers, I need a part by part description and an overview of what the entire piece does.

[code]
Sub Processor()
Dim ConstantCells As Range
Dim FormulaCells As Range
Dim cell As Range
' Ignore Errors
On Error Resume Next
' Process the constants
Set ConstantCells = Selection.SpecialCells(xlConstants)
For Each cell In ConstantCells
If cell.Value > 0 Then
cell.Interior.ColorIndex = 6
End If
Next cell
' Process the formulas
Set FormulaCells = Selection.SpecialCells(xlFormulas)
For Each cell In FormulaCells
If cell.Value > 0 Then
cell.Interior.ColorIndex = 7
End If
Next cell
End Sub
[/code]

Thanks in advance! I really appreciate any help that can be given.

Cheers

Sub Processor() ->Beginning of subroutine:Processor
Dim ConstantCells As Range ->Define ConstantCells as a range of cells
Dim FormulaCells As Range
->like above statement
Dim cell As Range
->like above statement
' Ignore Errors -> Statement starts wtih ' means comment
On Error Resume Next ->If exception/error happen,goto tag: Next
' Process the constants ->comment
Set ConstantCells = Selection.SpecialCells(xlConst...
->Set ConstantCells = the cells selected by you in the excel
For Each cell In ConstantCells-> All this statemet is to turn
the color the cells in the range to red while cell>0
If cell.Value > 0 Then
cell.Interior.ColorIndex = 6
End If
Next cell ' Process the formulas
Set FormulaCells = Selection.SpecialCells(xlFormu...
For Each cell In FormulaCells
->like above statements
If cell.Value > 0 Then
cell.Interior.ColorIndex = 7
End If
Next cell
End Sub ->tag to end the subroutine