Last seen: May 22, 2025
It works for me but your message box is misleading since it relies on the ProtectContents property, which you set to False in your protection.
You could use a function to get the status (this will return "All" if no filter is set): Function GetStatusFilterStatus() Dim tbl As ListObjec...
That code works fine here. Just as a side note, there is no need to compare a boolean to a boolean to get the same boolean, so you can just use If ...
As long as you open Excel before 9AM, you can use Application.Ontime to schedule the macro running.
Your Amber section is actually wrong, as is the Red. You need: =IFS(C314>=90, "GREEN",C314>=80,"AMBER",C314>=1,"RED") though ...
Ah, OK. You're using an OLAP data source (the data model) so you need to do this differently. In fact it's a little simpler as you don't need to loop,...
There's nothing syntactically wrong with the code that I can see, and it works fine here in some quick tests. Any chance you can post a workbook where...
Unless your formulas use INDIRECT, they will adjust automatically if rows/columns are inserted, so I'm not really sure why you need to do this at all?
More importantly, there is a difference between a SlicerCache and a Slicer. The SlicerCache name is "Slicer_" and the name of the Source field (I d...
That error means that there isn't a slicer cache with the name specified. Usually they start with "Slicer_" by default
You should be able to use Ron's RangeToHTML function
CrossFilterType and SortItems should both be Long not Single. .SortItems = xlSlicerCrossFilterHideButtonsWithNoData is not a valid value for So...
So to clarify, you would need: Sub FormatSlicer(SlicerName As String, SlicerFormat As SlicerFormatSettings) Dim theSlicer As Slicer Set the...
Assuming the format is consistent, you could also use Number.ToText([Header.partnb],"F3")
Thanks Catalin - I didn’t read closely enough!