welke code voor aktieve blad aktief te houden

[vrouw]

Ik wil een macro laten uitvoeren door een tabblad uit bestand 1 naar (geopend) bestand 2 te kopiëren maar zonder dat bestand 2 aktief word.
Het immers de bedoeling om na de kopieer aktie bestand 1 te sluiten en door te werken in bestand 2.

ik heb onderstaande maar dan word bestand 2 gesloten en dat is niet de bedoeling.

Sheets("Sheet1").Copy Before:=Workbooks("prognoses.csv").Sheets(1)
ActiveWorkbook.Close

 

[Ginger]

Begin met iets van OudeBestand = activeworkbook en het aan het einde van je procedure zet je dan OudeBestand.Close

 

[jgkdrt]

Of zo:

Sheets("Sheet1").Copy Before:=Workbooks("prognoses.csv").Sheets(1)
ThisWorkbook.Close

Daarnaast weet je wellicht dat csv-bestanden slechts 1 blad kunnen bevatten, dus bij opslaan ervan zal er gevraagd worden wat je wilt doen.