Lotus Notes / Domino Sonstiges > OLE/COM-Programmierung

Vorlage aus Excel kopieren und einfügen

(1/1)

awagner:
Hallo Leute,

ich bräuchte mal wieder euere Hilfe, denn ich komme bei folgenden Problem nicht mehr weiter:

Es soll ein Export in eine Excel-Datei erfolgen, aus einer Notes-DB (klappt auch soweit).
Die Excel Datei hat einen festen Aufbau.

Nun möchte ich aus Notes mehrere Zeilen von der Excel-Datei kopieren und in der Excel-Datei weiter unten einfügen.
Ich hab das ganze über xlWbk.ActiveSheet.Range("a3:h8").copy auch schon in die Zwischenablage bekommen,
aber der Befehl xlWbk.ActiveSheet.Range("a41:h45").paste wirft den Fehler "Instance member PASTE does not exist" aus...

Was ist daran falsch!?!

Bitte um Hilfe

Axel:
Die Fehlermeldung sagt dir bereits was daran falsch ist: Instance member PASTE does not exist.

D.h. es gbt keine Paste - Methode.

In der VBA-Hilfe zu Excel habe ich folgendes Beispiel gefunden.


--- Zitat ---In diesem Beispiel werden die Formeln im Bereich A1:D4 von Sheet1 in die Zellen E5:H8 in Sheet2 kopiert.

Worksheets("Sheet1").Range("A1:D4").Copy _
    destination:=Worksheets("Sheet2").Range("E5")


--- Ende Zitat ---

Umgesetzt müsste das dann so aussehen:

xlWbk.ActiveSheet.Range("a3:h8").copy (xlWbk.ActiveSheet.Range("a41:h45"))

Da bin ich mir aber nicht ganz sicher. evt. ist es einfacher der Reihe nach die Werte in eine Variable auszulesen und dann in die entsprechende Zelle zu schreiben.


Axel

awagner:
Hallo,

ich konnte es folgendermaßen umsetzen:

   xlWbk.ActiveSheet.Range("a3:h8").copy
   xlWbk.ActiveSheet.Range("a" & i).select
   xlWbk.ActiveSheet.paste

Navigation

[0] Themen-Index