Hallo,
ich benötige mal wieder euere Hilfe.
Und zwar habe ich ein Makro, welches mir aus verschiedenen Dateien Zeilen in eine neue Tabelle kopiert. Nun habe ich das Problem, dass die Dateien alles Dateien aus ältere Versionen sind, die neue Datei (welche von dem Makro automatisch erstellt wird) darf jedoch nicht im Kompatibilitätsmodus erstellt / gespeichert werden, da hier die Zeilenanzahl nicht auslangt! Wie bringe ich dem Makro bei, dass er eine Datei in der Excel Version 2010 erstellt?
Anbei das Makro. Ich habe das .xls schon in .xlsx / .xlsm geändert, das hat aber auch nichts geholfen.
Danke für eure Hilfe!
ctiveSheet.Select
Range(Selection, Cells(1)).Select
Columns("A:A").Select
Selection.Insert Shift:=xlToRight
Range("A1").Select
ActiveCell.FormulaR1C1 = "Forecastdatum"
Range("A2").Select
ActiveCell.FormulaR1C1 = _
"=MID(CELL(""Dateiname""),FIND(""]"",CELL(""Dateiname""))-14,10)"
Range("B2").Select
Range("B1048576").End(xlUp).Select
ActiveCell.Offset(0, -1).Select
Range(Selection, Selection.End(xlUp)).Select
Selection.FillDown
Range("A2:AB2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Windows("Konsolidierte Datei.XLS").Activate
Range("A1048576").End(xlUp).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWorkbook.Save