Domino 9 und frühere Versionen > ND6: Entwicklung
Automation object member not found
Barbara:
Hallo zusammen,
stehe mal wieder auf dem Schlauch und die Tipps, die ich hier gefunden habe bringen mich nicht wirklich weiter.
Ich öffne eine Excel-Tabelle und suche mir dort Ersatzwerte, die ich in ein Notesdokument eintrage. Das habe ich in mehreren Anwendungen in beide Richtungen schon praktiziert, lief immer problemlos. Um so mehr verblüfft mich die og. Fehlermeldung.
Hier ein Auszug aus dem Script:
filename="C:\temp\IQDE-Projekte.xls"
Set xlapp = CreateObject("Excel.Application")
xlapp.Visible = True '=> damit ich zu Testzwecken sehe, was geöffnet ist
Call xlapp.Workbooks.Open (filename)
Set xlSheet = xlApp.Workbooks(1).Worksheets(1)
...
For i=1 To 36
If xlSheet(i,1)=Projektnummer Then => hier kommt die Fehlermeldung
Nummerneu=Strright(xlSheet(i,2),"S")
End If
Next
Es wird die richtige Datei geöffnet, sie ist nicht schreibgeschützt oder sonstwas.
Hat Jemand eine Idee, was hier quer liegt?
Schon mal Danke
Barbara
Driri:
Was ist denn Projektnummer ?
Barbara:
ich verpasse den Dokumenten eine neue Projektnummer.
In der Excel-Tabelle sind unter Anderem alte und neue Projektnummer geführt. Weiter oben im script passe ich die Projektnummer des Notesdokumentes der Nomenklatur in der Excel-Tabelle an.
Barbara
Driri:
Also ist Projektnummer eine String-Variable ?
Ist denn so der Vergleich überhaupt möglich ? Ich kenne mit mit der Excel-Anbindung nicht aus, aber ich würde da irgendwie noch so etwas wie ".value" oder so dahinter erwarten.
So in etwa :
--- Zitat ---...
If xlSheet(i,1).value=Projektnummer Then
...
--- Ende Zitat ---
Barbara:
Yepp, das war der Ansatz. Das kommt davon wenn man mit der heißen Nadel strickt, nach dem Motto -ich mach mal schnell, das haben wir gleich.....
also es heißt richtig: xl.sheet.cells(i,1).value
oh Mann, das ist jetzt echt peinlich.
Danke für die richtigen Fragen :D
Gruß
Barbara
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln