Macro: bestand sluiten zonder opslaan

[Revolutionary]

Goedemiddag helpers,

Ik heb weer eens een vraagje. Dit keer heb ik een macro die een excelbestandje opent (in prn formaat), uit dat bestand bepaalde data haalt en vervolgens kopieert in een excelbestand waarin gewerkt wordt. Deze handeling moet in totaal 17 keer uitgevoerd worden (ik heb dus ook 17 verschillende macro's), waardoor er naast het excelbestand waar in wordt gewerkt nog 17 andere bestanden worden geopend.

Nu zou ik de vba-code willen aanvullen met een commando om deze bestanden automatisch te sluiten zonder op te slaan, zodat ik ze niet steeds handmatig moet sluiten.

De volgende regel heb ik al geprobeerd: Activeworkbook.Close
Maar bij het uitvoeren van de macro wordt toch nog steeds gevraagd of ik het bestand wil opslaan

Weet iemand welk commando ik moet opgeven, zodat het bestandje wordt gesloten zonder op te slaan?

Groeten,
Tim

 

[wiki]

Workbooks("wb").Close SaveChanges:=False

gr wim

 

[Revolutionary]

Beste wiki,

Bedankt voor je hulp:thumb:

Jouw stukje vba-code werkt Ik krijg nu alleen wel de melding dat er een grote hoeveelheid informatie aanwezig is op het klembord, met de vraag of ik deze informatie in een ander document wil plakken. Dus dan moet ik als nog 17x op 'nee' drukken... Is er ook nog een VBA-code waarmee ik deze melding kan voorkomen?

Groeten,
Tim

 

[wiki]

zet voor wb.close

Application.CutCopyMode=False

gr wim

 

[Revolutionary]

Thanks Wiki!:thumb:

Nu werkt de macro optimaal

Ik zet deze topic op opgelost.