Domino 9 und frühere Versionen > ND7: Entwicklung

Excel Import

<< < (3/7) > >>

atbits:
Verwende Option Declare

atbits:
Vermutlich soll da irgendwo noch ein
With xlSheet

stehen!

Grischu:
So wie ich das sehe entweder


--- Code: ---tmpKundennr = xlSheet.Cells( row, 1 ).Value
--- Ende Code ---



oder


--- Code: ---With xlsheet
tmpKundennr = .Cells( row, 1 ).Value
--- Ende Code ---

Alperen15:
Hallo alle zusammen.

es funktioniert zu mindest soweit, dass ich den ersten Kunden anhand seiner Kundennummer finde und die Felder befülle. Allerdings ist es eine Endlosschleife. Aussenrum müsste ich eine Do-Schleife machen.

Gibt es so ein ähnliches Befehl wie z.B. view.GetNextDocumentByKey() ????

         'While Not(vdoc Is Nothing)
      While Not (vdoc Is Nothing)
         'Set doc = New NotesDocument(db)   
         vdoc.Form = "maKundenetikett"
         vdoc.fdLayout1 = .Cells( row, 2 ).Value                   
         vdoc.fdLayout2 = .Cells( row, 3 ).Value                 
         vdoc.fdLayout_Ende = .Cells( row, 4 ).Value       
         vdoc.fdPLPA = .Cells( row, 5 ).Value               
         vdoc.fdFSPS = .Cells( row, 6 ).Value               
         vdoc.fdPUNr = .Cells( row, 7 ).Value
         
         
         Call vdoc.save(False,True)   
         
         Set vdoc = view.GetNextDocument(vdoc)
         tmpKundennr = .Cells( row, 1 ).Value
         Set vdoc = view.GetDocumentByKey(tmpKundennr)
         
      Wend
   End With

koehlerbv:
Du stocherst doch nur wild im Nebel, ohne zu wissen, was Du da eigentlich machst. Was willst Du denn mit einer Schleife über Notes-Dokumente? Kannst Du uns das erklären?

Du musst doch vielmehr ... na, das *musst* Du selber wissen, sonst bringt unsere Unterstützung hier gar nichts. Beschreibe uns, was für eine Schleife Du brauchst, und dann ist unsere Hilfe auch wieder sinnvoll.

Bernhard

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete

Zur normalen Ansicht wechseln