VBA error ved sckMain.LocalIP kald

Jeg skal starte et ældre program der bla. indeholder følgende kode:

---------START AF UDSNIT-----------

Private Sub cmdConnect_Click()
On Error Resume Next
    Dim tx$

    tx$ = "route add 10.10.6.100 " + sckMain.LocalIP
    txtRPort = "1234"
    txtLPort = "1234"
    txtRHost = "10.10.6.100"
    Shell (tx$)
    sckMain.RemoteHost = txtRHost
    RemoteHost_IP = txtRHost
    ......
    ....
    ..

--------- STOP AF UDSNIT -----------

men ved kørsel af programmet meldes der om fejl på "sckMain.LocalIP". Programmet køres i VBA Excel editoren. Er det noget med at jeg har glemt en add-in ?