Lotus Notes / Domino Sonstiges > Tipps und Tricks

[Script] Export View nach Excel (neue Version)

<< < (6/10) > >>

TMC:
Bin schon gespannt an was es liegt bzw. liegen könnte.

Gut - man muss dazu sagen, dass diese Routine hier auch sonst nicht perfekt ist, z.B. das ErrorHandling könnte durchaus verbessert werden (z.B. Error 91 wenn View nicht gefunden wird -> da sollte schon eine bessere Fehlermeldung kommen).
Aber sie wohl eine gute Grundlage für jemanden der sowas braucht. Und funktioniert auch (zumindest meistens  ;D ).

Zum Errorthandling:
Eine ähnlich bescheuerte Fehlermeldung finde ich den Error 4522 ("DOM parser operation failed"). Kann z.B. beim "Call notesXMLProcessor.Process" kommen, aber Details sind völlig im Dunkeln.

Grüße zurück nach Oberbayern,
Matthias

Doc:
Hallo und guten Morgen Matthias und Berndhard,
habe mal den Debugger zum Thema befragt, obwohl ich noch nicht die riesen Erfahrung damit habe.
Wenn ich das richtig gesehen habe, loop das Script an folgender Schleife.

Vorab: Das Script wurde in keiner Weise von mir verändert.

Set viewCloumn=view.columns(iK-1)
vExcelSheet.Cells (iRows,iCols).Value = viewColumn.title
iCols = iCols +1
Next IK

Habe daraufhin die Ansicht neu aufgebaut und Spalte für Spalte getestet. Dabei habe ich
die Scriptunverdauliche Spalte entlarven können.

Die letzte Spalte bewirkte den Script K.O.  (Ist wie beim Schlüsselbund, immer der/die Letzte).

Spalte hatte folg. Titel `Ende der Daten` - Mit der Formel `""`. (2x ")

Gruss
Werner

 

TMC:
Hallo Werner,

danke für die hilfreichen Angaben. Der Fehler ist dadurch gefunden.
Wenn eine Spalte "" enthält als Formel, dann wird via

--- Code: ---viewentry.ColumnValues
--- Ende Code ---
ein kleineres Array zurückgegeben (weniger Elemente).
Ich hatte schon die Lösung:


--- Code: --- If Isarray(viewentry.ColumnValues) Then
vColumAllValuesArray = viewentry.ColumnValues
Redim Preserve vColumAllValuesArray (0 To iColQuantity - 1)
Else
Redim vColumAllValuesArray (0 To iColQuantity - 1)
End If
--- Ende Code ---

Läuft wunderbar in ND6. In R5 kommt allerdings in der Zeile

--- Code: ---vColumAllValuesArray = viewentry.ColumnValues
--- Ende Code ---
ein Error 9 (Type Mismatch).
Recherchen in KnowledgeBase ergaben keine Einträge, aber im LDD-Forum. Dort wurden aber nur Workarounds genannt, die mir nicht gefielen.
Erstes Fazit für mich: Ist wohl ein R5-Bug !

Nachdem es in ND6 wunderbar läuft, bin ich dieser Thematik jetzt nicht mehr nachgegangen.

Ich werde jetzt auch keine Lösung mehr für R5 machen, ist ja doch schon obsolete.

Tipp für R5 Leute: Für den Excel-Export eine eigene View erstellen, die ausschließlich für den Export dient. Dabei Spaltenformeln wie "" vermeiden. Dann funktioniert es auch.


Aus Zeitgründen werde ich aber dem nicht weiter nachgehen, bitte um Verständnis.
Für mich selbst habe ich eine Excel-Export-Klasse geschrieben, die weit mehr bietet als diese Sub hier. Allerdings kann ich diese nicht veröffentlichen - da steckt einfach zuviel Arbeit drin um diese einfach for free zu veröffentlichen.

Wenn sich jemand aber mit dem hier veröffentlichten Code weiter auseinandersetzen will: Gerne. Der Code ist ja frei.

Doc:
Hallo Matthias,
zumindest hat es ja jetzt dazu geführt, dass wir den Fehler gut eingrenzen konnten.

Wir werden in 2005 auch auf die 6er Notes Version migrieren.
Auf jedenfalls ist Dein Script eine super Sache, dass steht eindeutig fest.

TMC:
Fast vergessen:
Hab jetzt oben im 1. Posting noch die lss-Datei für ND6 drangehängt, die soweit funktionierte.
Klappt aber nicht in R5 (siehe Posting # 27)!

Matthias

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete