Distributing data into varying tabs VBA

**Miskondukt** · 05-09-2019, 05:50 PM

Hello all,

Been a little while, but am back with a VBA question. I copied a generic VBA code (https://yodalearning.com/tutorials/e...to-split-data/) to distribute information from the attached sample file's "TestTab" using the 7th column's field "AssetClass" to new tabs per each "AssetClass" type.

I tried to modify the codee for my file as best I could but am getting stuck at the point where it filters and attempts to create a new sheet

Please Login or Register  to view this content.

Below is the full code

Please Login or Register  to view this content.

Also on the included sample file are three green tabs showing the expected results. Thank you for any help.
Kondukt

**Marc L** · 05-09-2019, 06:41 PM

As a beginner starter :

PHP Code:


Sub Demo()

        Dim R&, S$

        Application.ScreenUpdating = False

    With Sheet1

            .[A1].CurrentRegion.Columns(7).AdvancedFilter xlFilterCopy, , .[K1], True

        For R = 2 To .[K1].CurrentRegion.Rows.Count

            S = .Cells(R, 11).Value2

           .[K2].Value2 = S

            If Evaluate("ISREF('" & S & "'!A1)") = False Then Sheets.Add(, Sheets(Sheets.Count)).Name = S

           .[A1].CurrentRegion.AdvancedFilter xlFilterCopy, .[K1:K2], Sheets(S).[A1].CurrentRegion.Rows(1)

        Next

           .[K1].CurrentRegion.Clear

    End With

        Application.ScreenUpdating = True

End Sub

Do you like it ? So thanks to click on bottom left star icon « ★ Add Reputation » !

**Miskondukt** · 05-09-2019, 06:53 PM

Hey Marc,

Thank you for the reply and help, but when I try this code instead it breaks at

Please Login or Register  to view this content.

asking to debug.

**Marc L** · 05-09-2019, 07:03 PM

No issue on my side with your attachment …

**Miskondukt** · 05-09-2019, 07:17 PM

My fault, had a different file's module open. It works. Thank you good sir.

**Marc L** · 05-09-2019, 07:25 PM

Thanks for the rep' !

**Miskondukt** · 05-10-2019, 01:19 PM

Hey Marc, sorry to rebump this thread but I was wondering if you would be willing to update the VBA on this for me? I tried modifying it to my final file but haven't been able to. Also, I added some formatting requests if it isn't too much trouble. I have attached a sample file that has all the same structures as my final file with an expected results tab for an example labeled "AssetClass FinalTab to build"

PS. I Amazon Prime'd a VBA book last night.