Domino 9 und frühere Versionen > ND8: Entwicklung

Export in Excel

<< < (5/5)

umi:

--- Code: ---
tmp1 = ws.Prompt (PROMPT_OKCANCELEDIT, _
  "Bitte Koordinator eingeben", _
  "Bitte nur Nachnamen eingeben")
.
.
Set viewentry = vc.GetFirstEntry()
   Do While Not (viewentry Is Nothing)
      Do While (viewentry.ColumnValues(0) = tmp1) Hier kommt der Type mismatch
      For iCols=1 To 17

--- Ende Code ---

Könnte man doch wie folgt umgehen

--- Code: ---do while not (viewentry is nothing)
v=join(evaluate({@if(@ismember("} & tmp1 & {";@explode("} & join(viewentry.columnvalues,";") & {";";"));"1";"0")}),"")
if (v="1") then

.....




--- Ende Code ---

Man könnte auch die View so umbauen, dass in der 1. Spalte keine Mehrfachwerte vorhanden sind......

chock:
Hallo

danke für die ganzen Antworten. Konnte alle meine Probleme lösen.

Ich hole mir jetzt einfach nur die gesuchten Dokumente über:

Set vc = view.GetAllEntriesByKey(tmp1)

und lass mir dann die Werte aus den Ansichten in Excel importieren.

Do While Not (viewentry Is Nothing)
         For iCols=1 To 17
         vColValues=viewentry.ColumnValues(iCols)
         strColValue = AtImplode(vColValues, Chr(10))
         While InStr ( strColValue, Chr(13) ) > 0
         strColValue = Left$(strColValue, InStr ( strColValue,Chr(13) ) - 1) & "" & Right$(strColValue, Len(strColValue) - InStr ( strColValue, Chr(13) ))
         Wend
         vExcelSheet.Cells(iRows,iCols).Value = strColValue
      Next iCols
      iRows=iRows+1
      Set viewentry = vc.GetNextEntry(viewentry)


Ich werde den Vorschlag von umi nochmal testen.
Danke

chock:
Hallo,

nun soll der Export so erweitert werden, das auch Dokumente aus 2 oder 3 Kategorien in Excel exportiert werden. In der View ist die erste Spalte nach dem Feld "Kategorie" sortiert. Wie bekomme ich es hin, das die Dokumnete der Kategorie z.B. A,B genommen werden?
Habe es schonmal mit FTSearch versucht, hat aber nicht funktioniert. Welche Möglichkeiten habe ich?

Danke

Gruß

Navigation

[0] Themen-Index

[*] Vorherige Sete