VBA to split worksheets in group of 2 in different files

[Amvreyzen]

Hi, this is my first post.
I am trying to use VBA to split worksheets in group of 2 into different workbooks. I have a file that has over 40 sheets, but I would like to separate the worksheet No. 1 and No.2 in a single workbook, and so on.
Is there a way to do tha?

Thanks!