Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Creating a Sub Function
How do I create a function that is sent one variable. I
want it be sent a variable called i and another FinalRow. Then I want it to do it's thing. I want to be able to call this function at anytime in my macro by just typing FunctionName(i,FinalRow). Here what I want to be included in my function n = i For n = i To FinalRow If (Range("A" & n).Value) = "" And (Range("B" & n).Value) = 1 And (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 you |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Creating a Sub Function
Public Sub MySub(I As Integer, FinalRow As Integer)
Your Code Here End Sub Then to call it: MySub(I,FinalRow) I would put the sub in a module for example Module1 then call it this way. Module1.MySub(I,FinalRow) wrote in message ... How do I create a function that is sent one variable. I want it be sent a variable called i and another FinalRow. Then I want it to do it's thing. I want to be able to call this function at anytime in my macro by just typing FunctionName(i,FinalRow). Here what I want to be included in my function n = i For n = i To FinalRow If (Range("A" & n).Value) = "" And (Range("B" & n).Value) = 1 And (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 you |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Creating a Sub Function
"Township of East Hanover" skrev i melding
... Public Sub MySub(I As Integer, FinalRow As Integer) Your Code Here End Sub Then to call it: MySub(I,FinalRow) It's usually either MySub I,FinalRow or Call MySub (I,FinalRow) They do the same, question of style and taste only. But MySub(I,FinalRow) should produce an error. HTH. Best wishes Harald |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Need help creating a function | Excel Worksheet Functions | |||
Creating a function | Excel Worksheet Functions | |||
Need help creating a function | Excel Discussion (Misc queries) | |||
creating a function | Excel Discussion (Misc queries) | |||
Creating a function | Excel Programming |