Export workbook using save as dialog

[Exceladd1ct]

Hello, I am building a user form which will be used for data input in some sheets in the workbook. In order to export the current progress without closing the form, using save as dialog, I want to export the workbook (copy sheets to a new workbook) using vba by clicking a button. But all I can find is how to export a single sheet, not the entire workbook.
The sheet names can vary so i have to loop trough all sheets and copy them to a new workbook using save as dialog.

Can anyone please help me with a piece of code?

Thank you.