Excel Import Frage zu Script

[Worn]

Hallo,

ich hab mich mal durch das Forum gewühlt und mehrere Interessante Einträge zu Excel Import in Notes Datenbanken durchgelesen. Besonders ist mir dieser Beitrag hier:

http://www.atnotes.de/index.php?board=7;action=display;threadid=2138

..genauer der Post von Eknori aufgefallen:

Guckst du hier:

http://eknori.dyndns.org/knowledge/devidea.nsf/703257f00a483fb180256879002c0178/4b7669181eec660d4125689c002760bd?OpenDocument

oder:

http://eknori.dyndns.org/knowledge/devidea.nsf/703257f00a483fb180256879002c0178/0705dd8bc8fd8100412568b90065a1e3?OpenDocument

eknori

Der zweite Link führt zu einem Script, wo folgender Teil raus entstammt:

Code

.
.
.
sheetLoc$ = Inputbox("Enter the locaiton of Excel Sheet","Location","c:\temp\MailMerge.xls") ' ==> The Excel Sheet file path

If sheetLoc$ = "" Then
Msgbox "The Excel sheet locaiton is mandatory. Please re-run the macro again"
Exit Sub
End If

Set dataSheet = GetObject(sheetLoc$ )
.
.
.

Das Script verstehe ich soweit, also habe ich es mal eingebaut in eine kleine Testumgebung.
Später wird im Code auf das dataSheet Objekt zugegriffen:

Code

.
.
While Not (dataSheet.Cells(rowCount,1).Value = "" )
Set report = db.createdocument
report.Form = "Test"
.
.

Und genau bei

Code

While Not (dataSheet.Cells(rowCount,1).Value = "" )

Steigt der Code aus mit der Meldung:

"Instance member Cells does not exist."

Also scheint was mit dem Objekt nicht ganz hinzuhauen... Meine Frage ist nun..... Habe ich etwas vergessen (scheint so simpel zu sein das Script)... also hier wird nicht (wie in dem anderen script in dem Link) ein Excel object erstellt etc....

Blickt da jmd. durch... brauch mal einen Wink... (ps. habe auch das andere Script was eknori dort gepostet hat probiert, das geht soweit ist aber viiieeel komplizierter ;-), also der Einfachheit halber würde ich gern das andere nehmen :-))

Grüße
Ben

[Axel]

Ich hab's mal gestestet und komme zum gleichen Ergebnis wie du.

In Richtung COM-Schnittstelle auch schon einiges gemacht aber nie mit GetObject sondern immer den aufwendigeren Weg (siehe eknori's ersten Link). Hier bekomme ich einen sauberen zugriff auf die eine Excel.Application - Instanz und habe Zugriff auf alle darunter verfügbaren Objekte mit ihren Methoden und Eigenschaften. Das hat bisher immer funktioniert und der Code hat auch schon so manchen Release-Wechsel ohne Änderungen überstanden.

GetObject liefert zwar was zurück, das scheint aber nichts richtig verwertbares zu sein. Warum das aber jetzt so ist, kann ich dir auch nicht sagen. Ich gehe davon aus, wenn Ulrich das postet, dann hat das auch funktioniert.

Axel