Voorkomen dat rijen worden verwijderd

Status
Niet open voor verdere reacties.
S

SusanS

Nieuwe gebruiker
Lid geworden
17 jun 2022
Berichten
3
Is er een commando waarmee de gebeurtenis "rij verwijderen" in Excel wordt gedetecteerd?

ik wil graag een bericht geven als dit gebeurd, en voorkomen dat de verwijdering wordt doorgevoerd.
 
Het blad beveiligen
 
Of:

In Thisworkbook.

Code: 
Private Sub Workbook_Open()
  With Application
  .CommandBars("row").Controls(8).Enabled = False
  .CommandBars("cell").Controls(10).Enabled = False
 End With
End Sub


Private Sub Workbook_BeforeClose(Cancel As Boolean)
With Application
 .CommandBars("row").Reset
 .CommandBars("cell").Reset
End With
End Sub
 
HSV zei:
Of:

In Thisworkbook.

Code: 
Private Sub Workbook_Open()
  With Application
  .CommandBars("row").Controls(8).Enabled = False
  .CommandBars("cell").Controls(10).Enabled = False
 End With
End Sub


Private Sub Workbook_BeforeClose(Cancel As Boolean)
With Application
 .CommandBars("row").Reset
 .CommandBars("cell").Reset
End With
End Sub
Klik om te vergroten...
 
Dankjewel, dit is denk ik wat ik zocht. Het is overigens niet de bedoeling dat dit voor het hele bestand geldt, alleen voor 1 werkblad.
Andere vraag:
Waarom zou ik het resetten voor close, als ik het toch weer activeer zodra ik het bestand open? Klinkt mij (als broekie) onlogisch/onnodig.
 
1: Zet de code met een if constructie in de Sheetdeactivate in Thisworkbook.

2: Zolang je applicatie open staat zal in elk bestand die controls uitgeschakeld zijn.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan