D.m.v. macro nieuw bestand maken

[dennisaa]

Ik wil het volgende "automatiseren" d.m.v. een macro, maar loop steeds vast:

- Nieuw excel-bestand openen vanuit een "moederbestand";
- In het nieuwe bestand een aantal gegevens kopieren uit het moederbestand;
- Aan dit bestand een naam meegeven welke is aangegeven in een cel van het moederbestand;
- Opslaan in dezelfde map als het moederbestand.

Kan iemand me hierbij helpen, hoe ik dit in een macro kan omschrijven? Alvast heel erg bedankt!!

Groeten, Dennis

 

[VenA]

Deze stapjes kan je via de opnameknop vrij eenvoudig realiseren. Deze knop is te vinden onder ontwikkelaars en heet "Macro opnemen" Als je klaar bent kan je op dezelfde plek op "opname stoppen" klikken.

Je kan de macro daarna via <ALT>+<F8> aanroepen of bewerken.

 

[Weust]

Sub CODE()
Dim wsActive As Worksheet
Set wsActive = ActiveSheet

'nieuw bestand
    Workbooks.Add
    
'gegevens overnemen
    wsActive.Range("A1").Value = ActiveSheet.Range("A1").Value

'opslaan
    ActiveWorkbook.SaveAs Filename:="C:\plaatsvanjemoedebestand\" & ActiveSheet.Range("A1").Value & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
    
End Sub

Zo iets?