ich habe mal ein Problem, was ich nach diverser Recherche nicht lösen konnte.
Letztlich möchte ich Daten zwischen den Tabellenreitern zweier Dateien transportieren und keine Daten im Zwischenspeicher behalten.
Hört sich easy an und soll lt. zigfacher Ausführeungen von
Application.CutCopyMode = False
über Application.DisplayAlerts = False
auch alles gar kein Thema sein. Doch es scheint bei mir etwas nicht zu stimmen, weil trotzdem immer die Meldung kommt, ob ich denn die Daten aus dem Zwischenspeicher behalten oder entfernen möchte, egal wo ich oben erwähnte Codezeilen platziere. Aufgefallen ist mir, dass mir der Editor auch nur die Konstanten xlCut und xlCopy anbietet, jedoch nicht die Parameter True und False.
Keine Ahnung was ich noch machen soll aber ich will in meinem VBA.Code natürlich nicht dauern Abfragen bestätigen müssen.
Außerdem ist es sicherlich nicht so der besten Stil einfach mal alle Display-Meldungen zu unterdrücken. Kann ja auch mal was wichtiges sein. Klappt aber selbst wenn ich wollte nicht.
Zur Not könnte man per VBA die 'Nein'-Taste drücken, doch deren VBA-Umsetzung kann/kenn ich noch nicht.
Mein Code sieht dann in etwa so aus
' Aktuelle Exportdaten abspeichern
Set rngExportKopie = getCopyRange(wsDatenExportNeu)
rngExportKopie.Copy
With wsDatenNeu.Range("A1")
.PasteSpecial xlPasteValues
.PasteSpecial xlPasteFormats
End With
Application.CutCopyMode = False
getCopyRange ist dabei eine eigene Function, die ein Worksheet erhält und dann den benutzen Bereich in einem Range-Objekt ablegt und diesen zurück gibt. Wenn ich an dieser Stelle Application.CutCopyMode auf false setze, kommt die Meldung trotzdem.
Was kann ich noch tun?
Danke schon mal für die Hilfe.
VG Benni