Closing one workbook

[Richynero]

Hi there,

I have a macro that does various things with a pivot table, it then duplicates the file and saves it as something else.

I then need to close this duplicated file once it has been saved but when I use activeworkbook.close it closes the active workbook and the original file. I need the original pivot table still open to continue doing other duplications.

I have tried referencing the new file name and closing that but it still closes both files.

Any help would be greatly appreciated.

Thanks!

Richard

 

[Richynero]

Ignore this. I have fixed the issue

 

[ChrisGrigg]

hello any chance you could advise how this was fixed? I need to do the same thing.

thx

 

[mrshl9898]

Something like this:

You want to declare the current book and refer to it when closing

Sub wbclose()


Dim wb As Workbook


Application.DisplayAlerts = False


Set wb = ThisWorkbook


Sheets("Sheet1").Copy 'creates new, now active book


wb.Close


Application.DisplayAlerts = True


End Sub