VBA Excel Macro

chanshaw

I hope this is the right forum for this (if not let me know where i should have posted this) Alright I'm having a little trouble passing some arguments to a function and then having it return what I need it to.

Expand|Select|Wrap|Line Numbers

 
Sub Startup()

    ProcessCollection(colAbvs, 4)

End Sub
 
Function ProcessCollection(incCollection As Collection, specifiedLength As Integer)

    For counter = 1 To incCollection.Count

    tempString = incCollection.Count

    stringLength = Len(tempString)

    If (stringLength > specifiedLength) Then

        MsgBox stringLength & " is greater than specified length"

    ElseIf (stringLength < specifiedLength) Then

        MsgBox stringLength & " is less than specified length"

    ElseIf (stringLength = specifiedLength) Then

        MsgBox "Equal"

End Function

It doesn't seem to like me passing it arguments this way can someone let me know what im doing wrong.

ChipR

I haven't tried this with a Collection, but assuming that all works, line #7 would have to reference the variable counter instead of Count.

VBA Excel Macro

re: VBA Excel Macro

Similar Microsoft Access / VBA bytes

/bytes/development

/bytes/it

/bytes/other

/bytes/about