Gemme som skabelon

Du har udeladt filformat. Prøv at angive det rigtige format, som er en parameter på SaveAs.

Er ikke lige helt med på hvad du mener.

Synes at jeg har angivet det rigtige filformat for excel skabelon. Den hedder .xlt

Ja, det er fuldstændig rigtigt, at en excel skabelon hedder .xlt (til og med Excel 2003), men du er nødt til at angive filformatet også. Ellers kan Excel ikke genkende det. Dvs. at linjen

ActiveWorkbook.SaveAs "d:\Faktura\excelfakturaDB\Laves auto faktura190807(færdig)_11.XLT"

også skal indeholde filformatet (slå evt. SaveAs op i hjælpen, hvor du kan se de tilgængelige parametre.

ActiveWorkbook.SaveAs "d:\Faktura\excelfakturaDB\Laves auto faktura190807(færdig)_11.XLT", FileFormat:=17

Du skal nok lige tjekke op på filformatet, da jeg kører Excel 2007.

prøv :

ActiveWorkbook.SaveAs "d:\Faktura\excelfakturaDB\Laves auto faktura190807(færdig)_11.XLT", FileFormat:=xlTemplate

Jeg har været ved at lege lidt med de forskellige filformater, men synes ikke at jeg kan få det til at virke.

jeg køre med office 2003. Så hvis det er en der kan lede mig lidt mere på vej, ville jeg blive glad.

Hvis ikke du kan få min/excelents kode til at virke, vil jeg foreslå, at du optager en makro, hvor du gemmer en fil som en skabelon. Så kan du bagefter se præcis de parametre, som Excel har behov for.

-> excelent
xlTemplate og 17 skulle meget gerne give samme resultat :-) Hvis du har 2003, kan jeg så få dig til at tjekke det?

ja har 2003 og makrooptager anvender xlTemplate
ved ikke ok 17 er det samme

->excelent - du kan se det, hvis du stepper igennem koden og holder markøren henover xlTemplate, når koden er nået dertil. Jeg tjekker det, når jeg har adgang til en 2003 (på jobbet *s*)

ok yep det er 17

->excelent Takker. Så er vores kode ens :-)

Jeg fandt ud af det ved at optage en marko, som i forslog mig.

Den måde havde jeg ikke lige tænkt på. Jeg takker meget for hjælpen. :-)

Hvis i ligger et svar, deler jeg point ud til jer.

Skal bare lige vide hvordan jeg deler pointene til jer.

Og hvad var det så, der var anderledes i den optagede makro i forhold til, hvad vi har foreslået?

Svar :-)

(du kan dele pointene, når også excelent har svaret, men jeg tror, at excelent er mere inde i den del end jeg er)

word-hajen står vist for hovedparten af løsningen
så kan du ikke fordele efter fortjeneste :-)

Godmorgen.

Har haft lidt travlt de sidste par dage, men her kommer min løsning.

sub marko1()

ChDir "D:\Faktura\excelfakturaDB"
    ActiveWorkbook.SaveAs Filename:= _
        "D:\Faktura\excelfakturaDB\Laves auto faktura190807(færdig)_111_1.xlt", _
        FileFormat:=xlTemplate, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
End Sub

Så i havde ret i hvad i skrev. :-)

Jeg skal bare være noget bedre til at prøve at optage en marko, og evt. finde ud af hvordan den kan laves

I må have en rigtig god weekend.

Tak i lige måde.

Og lige en hurtig kommentar :-)
Med mindre der er en helt speciel grund (som jeg ikke kan se af ovenstående), behøver du ikke at skifte folder, inden du gemmer din workbook.