Need a Macro to group certain columns and save them as a separate file in specific folder

Dear Friends,

I have more than 1000 rows and 100 columns of data.

I need a MACRO to separate Cols. A, B along with unique values in Row #2 then that file should be saved in a separate folder as per the value in Col.B.

I attached a sample file in which I furnished all details.

I request your kind help.

Request kind help... please...

Maybe:

Sub acsishere()
Dim i As Long
Dim ws As Worksheet
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set ws = ActiveSheet
ws.Copy Before:=Sheets(1)
ActiveSheet.Name = "Helper"
    Range(Cells(1, 3), Cells(ActiveSheet.UsedRange.Rows.count, ActiveSheet.UsedRange.Columns.count)).Select
    Selection.Sort Key1:=Range("C2"), Order1:=xlAscending, Key2:=Range("C1") _
        , Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
        False, Orientation:=xlLeftToRight, DataOption1:=xlSortNormal, DataOption2 _
        :=xlSortNormal
For i = 3 To ActiveSheet.Columns.count - 2 Step 2
        If i < 19 Then
        ws.Range("A1:B" & ActiveSheet.UsedRange.Rows.count + 1).Copy
        Sheets.Add.Name = Cells(2, i).Value
        Range("A1").PasteSpecial xlPasteAll
        End If
        Sheets("Helper").Activate
Next i
Sheets("Helper").Activate
For i = 3 To ActiveSheet.Columns.count - 3 Step 2
        If i < 19 Then
        If Cells(2, i).Value = Cells(2, i).Offset(, 1).Value Then
        Sheets("Helper").Range(Cells(1, i), Cells(ActiveSheet.UsedRange.Rows.count + 1, i + 1)).Copy Sheets(Cells(2, i).Value).Range("C1")
        End If
        If Cells(2, i).Value <> Cells(2, i).Offset(, 1).Value Then
        Sheets("Helper").Range(Cells(1, i), Cells(ActiveSheet.UsedRange.Rows.count + 1, i)).Copy Sheets(Cells(2, i).Value).Range("C1")
        End If
        Sheets("Helper").Activate
        End If
Next i
ActiveSheet.Select
ActiveWindow.SelectedSheets.Delete
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub

Dear Sir,

Thanks for your magical code. It solves the purpose. A little error I found, when executed.

I request your magic hand to clear the problem.

Please Sir...

Dear Sir,

Thanks for your kindness & reply.

Actually, the data is only the sample to show the requirements.

The minimum & maximum number of elements will be: from 1 to 12. (i.e. number of each elements may vary from 1 to 12).

Request your kind help.

Sir, Excellent. It's working nicely. No words to express my Gratitude.

Thanks. Thanks a lot. It solved my huge task.

Regards.