Excel TV Episode 1 Challenge Quesiton

[jpo645]

This challenge question appeared on the first episode of Excel TV. While the winner has already been decided for last week, feel free to see if you can answer this riddle.

What's wrong with this code?


Do you think you know what the answer is? Feel free to post below.

[SamT]

strUserList As Variant

[mancubus]

another point. since it's a 0-based array, i would use: intFindUser = i + 1

[Bob Phillips]

Redundant str..., bln..., integer as a data type, exit the loop when matched ... besides the obvious fault.

[SamT]

Option Base = Any
'
'
'
UserIndex = -1
For i = LBound(UserList) to UBound(UserList)
   If UserList(i) = TargetUser Then
      UserIndex = i
      Exit Function
   End If
Next i

[Bob Phillips]

Option Base = Any
'
'
'
UserIndex = -1
For i = LBound(UserList) to UBound(UserList)
   If UserList(i) = TargetUser Then
      UserIndex = i
      Exit Function
   End If
Next i

Much better . And you ditched those ridiculous comments.

[snb]

function F_snb(targetuser,userlist)
    F_snb = Application.Match(targetuser, userlist, 0)
    If IsError(F_snb) Then F_snb=-1
End Sub