Split func - "Sub or function is not defined": Wtf!?

[the1nk]

Hey all.
I'm doing some VBA in Excel 2003 (11.81) it works great. However, when I send the workbook (including the macro) to a customer, she gets a compile error "Sub or function not defined" and highlights "Split" with its parameters. She's using Excel 2003 (11.5). Any ideas what could be causing that ?

Sub CountStores()
'Original Code by the masterful Bob Shenker
'Modified code by Adam Davis
'Setup the sheets..
Dim shtData As Worksheet
Dim shtSumm As Worksheet
'Setup the ranges..
Dim rngStores As Range
Dim rngSearching As Range
Dim srng As Range
Dim drng As Range
Dim dsrng As Range
'And Misc Variables..
Dim I As Integer
Dim iC As Integer
Dim strNames() As String
Dim iCol As Integer

Set shtData = ActiveWorkbook.Worksheets("Data")
Set shtSumm = ActiveWorkbook.Worksheets("Summary")

Set rngStores = shtSumm.Range("B4", shtSumm.Range("B65536").End(xlUp).Address)
For iCol = 1 To 16
    Set rngSearching = shtData.Range(Chr(72 + iCol) & "2", shtData.Range(Chr(72 + iCol) & "65536").End(xlUp).Address)
    For Each srng In rngStores
        strNames() = Split(srng.Value, ";")
        For Each dsrng In rngSearching
            For iC = LBound(strNames) To UBound(strNames)
                If (InStr(1, dsrng.Value, strNames(iC), vbTextCompare)) Then
                    I = I + 1
                End If
                'DoEvents
            Next iC
            DoEvents
        Next dsrng
        srng.Offset(0, iCol).Value = I
        I = 0
        DoEvents
    Next srng
    DoEvents
Next iCol
End Sub

 

[Richard Schollar]

Hi

try prefixing the Split function with VBA:

strNames() = VBA.Split(srng.Value, ";")

and see if the customer continues to suffer from this problem.
</pre>

 

[the1nk]

Apparently now it says "Method or data number not found." lol. :-X

 

[jindon]

the1nk<SCRIPT type=text/javascript> vbmenu_register("postmenu_1633788", true); </SCRIPT>

Ask her if her Excel has unneeded object libraly reference(s).
It sometime cause the problem with the functions.

 

[the1nk]

unneeded library references?

The customer, unfortunately, isn't a coder. So, therefore, the VBA settings (and references, I would imagine) should all be standard. I, too, have the standard references on, and no special ones on. :-\ So, I don't think it's that. But maybe she has missing references? I don't know how that would happen though. x_X

Thanks.

 

[Norie]

Ask the user to check under Tools>References... in the VBA editor.

Shouldn't be too difficult and they might actually find some references marked as MISSING.