如何防止刪除不受保護的共享工作簿中的行或列？

當您與他人共享工作簿時，如何防止他人在不保護工作簿的情況下刪除共享工作簿的列或行？ 在這里，我找到了一個VBA代碼，該代碼可以防止其他人刪除共享工作簿中的列和行。

防止使用VBA刪除共享工作簿中的行或列

防止使用VBA刪除共享工作簿中的行或列驚人的！ 在 Excel 中使用高效的選項卡，如 Chrome、Firefox 和 Safari！每天節省50％的時間，并減少數千次鼠標單擊！

1。 按 Alt + F11鍵 打開一個 Microsoft Visual Basic應用程序 窗口。

2。 點擊 插頁 > 模塊 打開“模塊”窗口，然后將以下VBA復制到該窗口。

VBA：防止刪除行或列。

Sub StopDeleteRowCols()Updateby20221221Dim xBarControl As CommandBarControlApplication.onKey "^{-}", ""For Each xBarControl In Application.CommandBars.FindControls(ID:=293)xBarControl.Enabled = FalseNextFor Each xBarControl In Application.CommandBars.FindControls(ID:=294)xBarControl.Enabled = FalseNextEnd SubCopy

3。 點擊 運行 按鈕或 F5 鍵盤上的鍵運行此代碼。

然后，當其他人右鍵單擊以刪除選定的列或行時，無法在上下文菜單中應用“刪除”選項。 看截圖：

此外，它還阻止用戶使用快捷鍵 Ctrl + - 刪除行或列。

請注意：

（1）如果您與 進入步驟三：發送 > 共享工作簿，您不能再添加任何VBA宏。 因此，最好在共享工作簿之前添加VBA。

（2）此VBA將禁用 刪除 在所有工作簿的上下文菜單中，右鍵單擊選定的列或行。

（3）恢復 刪除 在上下文菜單中，請同時替換 假 和 真 在上方的VBA中，然后再次運行VBA。

最佳辦公生產力工具

將小時轉化為分鐘 Kutools for Excel!

準備好增強您的 Excel 任務了嗎？ 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel！

為什么需要 Kutools for Excel