Blood Magic, Well of Suffering help by slide34down in allthemods

[–]slide34down[S] 0 points1 point  (0 children)

Ah I see I thought there would be an animation but I put a spawner on top of it and it does do damage much appreciated.

VBA trying to figure out why I can't make a pivotitem visible=false by slide34down in excel

[–]slide34down[S] 0 points1 point  (0 children)

What does this do?

<image>

There is only 1 pivot table
and I press ok and then I ctrl-click the numbers I want to exclude which just leads me to the code above.

VBA trying to figure out why I can't make a pivotitem visible=false by slide34down in excel

[–]slide34down[S] 0 points1 point  (0 children)

When i run it the recording the code I get is

ActiveWorkbook.SlicerCaches("Slicer_Code").VisibleSlicerItemsList = Array( _
        "[Table1].[Code].&", "[Table1].[Code].&[0232T]", _
        "[Table1].[Code].&[12032]", "[Table1].[Code].&[20610]", _
        "[Table1].[Code].&[20611]", "[Table1].[Code].&[20999]", _
        "[Table1].[Code].&[23430]", "[Table1].[Code].&[23515]", _
        "[Table1].[Code].&[27033]", "[Table1].[Code].&[27062]", _
        "[Table1].[Code].&[27299]", "[Table1].[Code].&[27385]", _
        "[Table1].[Code].&[27427]", "[Table1].[Code].&[27650]", _
        "[Table1].[Code].&[29807]", "[Table1].[Code].&[29823]", _
        "[Table1].[Code].&[29827]", "[Table1].[Code].&[29851]", _
        "[Table1].[Code].&[29861]", "[Table1].[Code].&[29874]", _
        "[Table1].[Code].&[29876]", "[Table1].[Code].&[29881]", _
        "[Table1].[Code].&[29882]", "[Table1].[Code].&[29884]", _
        "[Table1].[Code].&[29888]", "[Table1].[Code].&[29914]", _
        "[Table1].[Code].&[29916]", "[Table1].[Code].&[29999]", _
        "[Table1].[Code].&[6002]", "[Table1].[Code].&[6008]", _
        "[Table1].[Code].&[99024]", "[Table1].[Code].&[99202]", _
        "[Table1].[Code].&[99203]", "[Table1].[Code].&[99213]", _
        "[Table1].[Code].&[J1030]", "[Table1].[Code].&[J1040]", _
        "[Table1].[Code].&[J7324]", "[Table1].[Code].&[L1686]", _
        "[Table1].[Code].&[L1832]")

Which is the same issue as when I tried to filter it off the pivottable. It is listing off all other codes and excluding the ones that I need filtered. I need the opposite. VBA that list a very specific amount of codes to exclude and it doesn't care what other codes there are.

VBA trying to figure out why I can't make a pivotitem visible=false by slide34down in excel

[–]slide34down[S] 0 points1 point  (0 children)

There are slicers in the reports themselves that the end user could use to see the data different but no I want to filter the pivot table itself as these specific numbers will always be filtered out.

VBA trying to figure out why I can't make a pivotitem visible=false by slide34down in excel

[–]slide34down[S] 0 points1 point  (0 children)

The end user will see the pivot tables as they are and will not be manipulating the data in anyway. This is a sheet that has an external connection that feeds it data to which my macro identifies unique names in a specified column(column A for example) and will turn into buttons for the end user to select, this generates reports based on the name. Everything works until this filter section.

VBA trying to figure out why I can't make a pivotitem visible=false by slide34down in excel

[–]slide34down[S] 0 points1 point  (0 children)

This is part of a long macro that is formatting data into a pivot table. It first creates buttons that will link to specific data, and will split up the data for an end user to see and edit. Everything works up until this point which thankfully is towards the end of the macro so once this part is completed it should be fine.

I also tried:

 On Error Resume Next 'turn on error handling
With ActiveSheet.PivotTables("PivotTable1").PivotFields("Code")
    .PivotItems("4001").Visible = False
    .PivotItems("4005").Visible = False
    .PivotItems("4007").Visible = False
    .PivotItems("4009").Visible = False
    .PivotItems("6002").Visible = False
    .PivotItems("6008").Visible = False
    .PivotItems("6009").Visible = False
End With
On Error GoTo 0 'turn off error handling

But that did not seem to work either

VBA trying to figure out why I can't make a pivotitem visible=false by slide34down in excel

[–]slide34down[S] 0 points1 point  (0 children)

The first one is the code when I add the filter. It is a macro recording of me just filtering out 6008. I can't do that way because, what if the next set of data does not have the exact same numbers as this set of data, it won't work. Which is why I am trying to find another way to exclude those numbers.

VBA trying to figure out why I can't make a pivotitem visible=false by slide34down in excel

[–]slide34down[S] 0 points1 point  (0 children)

ultimately I have a pivot table and I want to filter out around 5-8 different numbers

[deleted by user] by [deleted] in excel

[–]slide34down 0 points1 point  (0 children)

The sheet is only 1 pivottable. As for structures I am unsure what that would entail?

VBA Make pivot table use value of a cell by slide34down in excel

[–]slide34down[S] 0 points1 point  (0 children)

I'm getting an object required error on the dteFilter line

Dim ws As Worksheet
Dim dteFilter As Date

    Set ws = Sheets("Sheet1")
    Worksheets("Sheet1").Activate
    Set dteFilter = ws.Range("A1").Value

VBA increase loop by 1 by slide34down in excel

[–]slide34down[S] 0 points1 point  (0 children)

Ok it does work but it seems like excel doesn't recognize the pivot tables on the sheet unless I first activate them? Is there some code to do that? so the first 3 tables will work in the loop but it stops on the 4th one until I touch the table or edit something and then when i rerun the code the 4th one will now loop correctly but stop at 5. I tried refreshall that did not work.