.saveas error 1004
Når jeg kører nedenstående giver det en error 1004 "Method 'Range' of object '_Global' failed" og jeg har efterhånden givet op.Sub generere_materialevalg()
With ActiveWorkbook.Sheets("Materialevalg")
.Copy
ActiveWorkbook.SaveAs Filename:=Range("Fildist") _
& Range("Byggeadresse") & " - Materialevalg " & _
Format(Now, "ddmmyyyy hh.mm") & ".xlsm", FileFormat:=52
ActiveWindow.Close
End With
End Sub
Hvis jeg taster destinationen ind i Immediate vises den rigtige sti "F:\Vesterbo Huse\Skabeloner\Under udvikling\Output\Kildebjerg Bakkevej 54 - Materialevalg 15042021 20.41.xlsm"
Kører jeg makroen vises ovenstående fejl og der er oprettet et nyt dokument "mappe1". Herefter virker Immediate ikke. Hvis jeg lukker "mappe1" virker Immediate igen.
Skriver jeg stien direkte i makroen, kører den fint.
Jeg har et par andre makroer, hvor samme range bruges til at gemme som pdf og de kører fint.
Kan noget hjælpe mig videre?