Excel Import

[koehlerbv]

Und Du hast es doch nicht begriffen ... 
Was willst Du mit der Schleife über vdoc?
Was erwartest Du, wenn Du bei der Gelegenheit Row hochzählst? Wie sollte Deiner Meinung nach denn dadurch mit der nächsten Excel-Row weiter gemacht werden??

Hast Du Dir das ganze schon mal auf Papier aufgemalt?? Spätestens da müsste der Blödsinn auffallen!

Bernhard

[Alperen15]

Nach drei mal durchläufe und erflogreich befüllte Felder. Springt er mir in der fett markierten stelle raus mit der Meldung "Object variable not set"

With xlSheet
      
      tmpKundennr = .Cells( row, 1 ).Value
      Set view = db.GetView ("vwKundennummer")
      Set vdoc = view.GetDocumentByKey(tmpKundennr)
      
      
      While Not (vdoc Is Nothing)
         tmpKundennr = .Cells( row, 1 ).Value
         Set vdoc = view.GetDocumentByKey(tmpKundennr)
         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)   
         row = row + 1
         
      Wend
   End With 

[Alperen15]

ich brauche doch meinen VDOC weil ich anhand der Kundennummer von der Exceldatei in der Ansicht nachdem Kunden suche und dann die Felder befülle..... falls es falsch ist könntet Ihr mir es erklären

[Peter Klett]

Logisch! Wann setzt Du vdoc und wann überprüfst Du, ob es existiert?

Beachte auch, was Bernhard geschrieben hat. Die Schleife über vdoc ist zwar nicht total daneben, aber SEHR ungeschickt. Wenn Du die Schleife auf Deine Art korrekt schreibst, wirst Du den Effekt haben, dass der Import beim ersten nicht gefundenen Kunden aussteigt, obwohl danach noch mehr Kunden erfolgreich aktualisiert werden könnten. Also vergiss die vdoc-Schleife, dreh an der Quelle und nicht am Ziel ...

EDIT: Logisch bezieht sich auf "Object variable not set"

[Alperen15]

Du Peter.....also anstatt While Not (vdoc Is Nothing) wäre While Not (tmpKundennummer Is Nothing) besser?

Weil irgendwie muss ich doch wieder hochkommen nachdem vdoc.save und nach der neuen Kundennummer in der Ansicht suchen

[koehlerbv]

Du liest offensichtlich nicht, was andere Dir schreiben ... Ich gebe auf, es hat wirklich keinen Zweck.

Bernhard

[Alperen15]

meine Frage ist Bernhard....wie schaffe ich es nachdem vdoc.save mit der neuen Kundennummer in der Ansicht nach dem Kunden zu suchen ohne der Schleife??

[koehlerbv]

Was habe ich geschrieben?

[atbits]

Das gleiche Spiel hatte wir im Dezember doch schon mal, mit dem gleichen Agenten.
Das macht mir keinen Spass 

[koehlerbv]

Exakt. Und nun soll der betreffende Arbeitgeber mal schauen, wie er aus der Nummer wieder rauskommt.

[Peter Klett]

OK, letzter Versuch...

While Not (tmpKundennummer Is Nothing) ist sinngemäß machbar, aber syntaktisch nicht so

tmpKundennummer lesen
While tmpKundennummer <> ""
   Dokument suchen
   Wenn Dokument gefunden
      Dokument aktualisieren
   row = row + 1
   tmpKundennummer lesen
Wend

Übersetzen musst Du das jetzt selbst. Einziger nichtberücksichtigter Fehlerfall ist, wenn nach der letzten Kundennummer keine freie Zeile mehr übrig ist.