Kan ikke kopiere ark til ny projektmappe
Hej Eksperter.Jeg sidder og bakser med en makro, og har problemer med et stykke der ser således ud:
----
' Opret en ny workbook
Set NewBook = Workbooks.Add
Application.DisplayAlerts = False
With NewBook
.SaveAs Filename:="Kabelsynsrapport.xlsx"
End With
Application.DisplayAlerts = True
ActiveCell.Offset(0, 100).Range("A1").Select
' Opret et nyt kabelsyns-ark i den nye workbook
Windows("forsynings ark.xlsm").Activate
Sheets("Kabelsynsrapport").Select
Sheets("Kabelsynsrapport").Copy Before:=Workbooks("Kabelsynsrapport.xlsx").Sheets(1)
---
Min kode fejler ved den sidste linje, og forsøger jeg at udføre handlingen manuelt, får jeg denne fejl:
Arkene kan ikke indsættes i destinationsprojektmappen, fordi den indeholder færre rækker og kolonner end kildeprojektmappen. Hvis du vil flytte eller kopiere dataene til destinatinosprojektmappen, kan du markere dem og derefter bruge kommandoerne Kopier og Sæt ind til at indsætte dem på arkene i en anden projektmappe.
Er der nogen der kan give mig et bud på hvorfor jeg får denne fejl?
Hvis jeg højreklikker på arket og kopiere den til en ny projektmappe, så kan det godt lade sig gøre, men er projektmappen oprettet i forvejen, vil den ikke smide det over.
Er der nogen der har et bud på hvad der kan være galt?
På forhånd tak for hjælpen.
