Datenübertragung per Mako
02.04.2020 15:34:18
DE
ich habe eine kleine Frage und wäre euch sehr dankbar, wenn ihr mir helfen könntet. Ich möchte ein Makro bauen, welches die Daten innerhalb der selben Datei von anderen Reiter in einem Reiter sammeln. Ich habe versucht ein Makro abzuleiten, jedoch funktioniert der Übertrag nicht. Ich würde es sehr schätzen, wenn Ihr mir meinen Fehler aufzeigen könntet.
Sub Schaltfläche1_Datenübertrag()
Application.ScreenUpdating = False
ThisWorkbook.Worksheets("BLG - MBSA").Range("N4:N17").Copy ThisWorkbook.Worksheets("Ü _
bersichtHC40").Range("D6:D19")
wb.Close False
Application.ScreenUpdating = False
ThisWorkbook.Worksheets("BLG - MBUSI").Range("N4:N17").Copy ThisWorkbook.Worksheets("Ü _
bersichtHC40").Range("E6:E19")
wb.Close False
Application.ScreenUpdating = False
ThisWorkbook.Worksheets("BLG - BBAC").Range("N4:N17").Copy ThisWorkbook.Worksheets("Ü _
bersichtHC40").Range("F6:F19")
wb.Close False
End Sub
Vielen Dank im Voraus!Viele Grüße
DE