Runtime- Probleme beim Lesen in Excel

Runtime- Probleme beim Lesen in Excel

Hallo Zusammen,
wir sind dabei uns Exceltabellen für unsere interne Auswertung zu erstellen. Funktioniert auch ganz gut wir haben nur ein Problem, dass das Auslesen nur bei Server Projekten fehlerfrei erfolgt. Wollen wir Werte über den Clienten auslesen bekommen wir immer einen sehr hohen negativen Wert. œber folgende Funktion lesen wir den Wert aus.

Dim i, z As Integer
On Error Resume Next
obzenOnED = GetObject(, "zenOn.Application")
If Not (obzenOnED Is Nothing) Then
Label1.Text = obzenOnED.Name
Label2.Text = obzenOnED.Projects.Item(NameProject).Name
Label3.Text = obzenOnED.Version
Else
Label1.Text = "Editor is not active!"
End If
zprj = obzenOnED.Projects.Item(NameProject)
If zprj Is Nothing Then
MsgBox(" Projekt " & NameProject & " ist nicht aktiv !")
Exit Sub
End If
Label9.Text = zprj.Variables.Item("Test ").Value.ToString

Gibt es Unterschiede beim Definieren der Tags ?
Kann uns jemand helfen ?

This is a migrated post! Originally posted on 03.01.2014 by user stn. Please be aware that information can be outdated.