How do I create a function that is sent two variables. I want it be sen
a variable called i and another FinalRow. Then I want it to do it'
thing. I want to be able to call this function at anytime in my macr
by just typing FunctionName(i,FinalRow). Here what I want to b
included in my function

n = i
For n = i To FinalRow
If (Range("A" & n).Value) = "" And (Range("B" & n).Value) = 1 An
(Range("C" & n).Value) = 1 And (Range("D" & n).Value) = "" Then
Rows(n & ":" & n).Cut
Rows(i & ":" & i).Insert Shift:=xlDown
End If
Next n

Thank yo

--
Message posted from http://www.ExcelForum.com