

July 15, 2018

1) First insert the shape (rectangle) then move to slicer this shape
2) Group the together and name the Group
3) then write the code worksheet event
Like
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Sheet1.Shapes.Range(Array("JobGrp")).Visible = msoTrue
End Sub
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Sheet1.Shapes.Range(Array("JobGrp")).Visible = msoFalse
End Sub


Trusted Members
Moderators

November 1, 2018


New Member

August 4, 2021

Hi gents,
I am not sure what this code is doing, once I right claik on a cell the slicer disappears.
You know, I am keeping looking for a solution for the same subject made by @ Greg Malek.
I am looking for a way or a code to disable the slicer right-click when I protect a sheet.
I have the code to disable the cells right-click, but the Slicer even after protecting the sheet is still allowing for right-click and then unwanted changes.
If I locked the slicer from the size and properties, then no filtering!
Please help me to solve this issue
1 Guest(s)
