• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

opslaan als in 2007

  • Onderwerp starter Onderwerp starter vrouw
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.

vrouw

Terugkerende gebruiker
Lid geworden
27 mrt 2010
Berichten
1.525
Hoi.
Ik had tot voor kort office 2003 :o en heb in een code met de opdracht
Code:
ActiveWorkbook.SaveAs "\posten\ " & [D1] & ".xls"
Dan werd er netjes een .xls bestandje opgeslagen.

Nu heb ik office 2007 :D en heb ik de code aangepast naar:
Code:
ActiveWorkbook.SaveAs "\posten\ " & [D1] & ".xls[COLOR="#FF0000"]m[/COLOR]"
Echter lijkt het erop dat het word opgeslagen als een webdocument ondanks dat het bestand nu wel de extenstie .xlsm heeft maar er word tegelijkertijd een map opgeslagen waarin xml en html documenten inzitten.
Als ik de map verwijder dan opent het .xlsm bestand als een leeg bestand.

Wat gaat er nu verkeert?:shocked:
 
ActiveWorkbook.SaveAs Filename:="\posten\ " & [D1] & ".xls", FileFormat:=56

Probeer dat eens?
 
Zo gaat het wel goed.
Hoe komt dat nou en wat is het verschil met deze formule?
 
Je dwingt via FileFormat een bepaald type bestand af (Excel 97-2003), dat is het enige verschil. De naam die je aan het bestand geeft maakt Excel niets uit, vandaar dat je ook moet aangeven welk type bestand het is.
Ik neem aan dat het standaard type wat je bij "Opslaan" in je instellingen hebt aangegeven bepaalt welk type Excel bestand het wordt als je niet zelf aangeeft/afdwingt dat een ander type Excel bestand moet worden opgeslagen.

Tijs.
 
He top, bedankt hoor. Ook voor de uitleg.
 
In VBA gaat opslaan als beter, zoals dnties al heeft uitgelegd, wanneer het fileformat wordt gespecificeerd. In dit geval xls.
Je blijft dan echter in comptabiliteitsmodus werken.
Op den duur is het beter om naar .xlsm over te stappen.
Hiervoor moet je het bestand eenmalig converteren. Dat doe je via de office knop > converteren.
Daarna verander je de code in
Code:
ActiveWorkbook.SaveAs Filename:="\posten\ " & [D1] & ".xlsm", FileFormat:=52
Mvg Leo
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan