Hallo und einen schönen Sonntag. Ich hätte mal eine Frage zu einem Kopiervorgang. Ich kopiere Spalten aus Datei1 (keine Formeln in den Spalten) nach Datei2 und dort
erscheint in Spalte "G" eine Formel mit (#NV) nachdem der Kopiervorgang abgeschlossen ist. Wie kann plötzlich eine Formel "kopiert" werden, die doch in Datei1 gar nicht vorhanden ist? Beim Vorgang erscheint kurz der eigentliche Wert, und danach kommt die Formel wohl mit dem Ergebnis #NV. Stelle mal den Code hier ein.
Hat hier vielleicht jemand eine Idee, wie man den Code berichtigen kann, um ein korrektes Ergebnis zu erhalten. Gruß Josef
erscheint in Spalte "G" eine Formel mit (#NV) nachdem der Kopiervorgang abgeschlossen ist. Wie kann plötzlich eine Formel "kopiert" werden, die doch in Datei1 gar nicht vorhanden ist? Beim Vorgang erscheint kurz der eigentliche Wert, und danach kommt die Formel wohl mit dem Ergebnis #NV. Stelle mal den Code hier ein.
Hat hier vielleicht jemand eine Idee, wie man den Code berichtigen kann, um ein korrektes Ergebnis zu erhalten. Gruß Josef
Visual Basic:
Option Explicit ' Variablendefinition erforderlich
Public Bovor As Boolean ' Tabelle vorhanden
'Für diese Prozedur müssen beide betroffenen Dateien geöffnet sein.
' Hier wird z. B. eine komplette Spalte von Spalte kopieren nach Vergleich2 kopieret.
Sub Test1()
' With Worksheets("inkopie.xlsm")
' Workbooks("ArbTab").Range("A1:1280").ClearContents ' LÖSCHEN der alten Daten???????
' End With
Dim Datei1 As Worksheet
Dim Datei2 As Worksheet
Set Datei1 = Workbooks("inkopie.xlsm").Sheets("ArbTab")
Sheets("ArbTab").Range("A2:I252").ClearContents
' Set Datei1 = Workbooks("ArbTab")
'("Hier muß die Originaldatei eingefügt werden")
' Set Datei2 = Workbooks("1tes quartal 2020.xlsm").Sheets("ArbTab")
Set Datei2 = Workbooks("auskopie.xlsx").Sheets("Tabelle1")
'("Hier muß die Einfügedatei eingefügt werden")
Datei2.Range("A1:I252").Copy Datei1.Range("A1:I252") ' .PasteSpecialPaste:=xlPasteValues
Application.DisplayAlerts = False
' Datei2.Close True
' Application.DisplayAlerts = True
End Sub
Zuletzt bearbeitet von einem Moderator: