Disable Cell formatting pop up Dialog

[fraz627]

How do I prevent the Cell formatting dialog from popping up when I right click on a cell?
Thanks

 

[Micron]

This will cancel the right click but you will lose all the options on the context menu.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
End Sub

You will lose all of this on whatever sheet that code is on. Ctl+1 might be the way to go if you need to format cells in that case.

 

[patricktoulon1]

hello
you can block only the formatting submenu if you want

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    Cancel = True
    With CommandBars("cell")
        .Controls(16).Enabled = False
        .ShowPopup
        .Reset
    End With
End Sub

you can make it work on a specific cell range too

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column = 2 Then
        Cancel = True
        With CommandBars("cell")
            .Controls(16).Enabled = False
            .ShowPopup
            .Reset
        End With
    Else
        Cancel = False
    End If
End Sub

enjoys
patrick

 

[fraz627]

Thanks exactly what I was looking for!!