Code ນຳໃຊ້ເຂົ້າໃນການໃສ່ ແລະ ປົດລ໋ອກ Sheet ແບບ ອັດຕະໂນມັດ

1. ນີ້ແມ່ນ Code ລ໋ອກເມື່ອທ່ານເປີດ Sheet ທີ່ມີ Code ລຸ່ມນີ້ :

Private Sub Worksheet_Activate()
Protect (P.Range("C2"))
End Sub

2. ນີ້ແມ່ນ Code ປົດລ໋ອກເມື່ອທ່ານອອກຈາກ Sheet ທີ່ມີ Code ລຸ່ມນີ້:

Private Sub Worksheet_Deactivate()
Unprotect (P.Range("C2"))
End Sub

3. ໝາຍບອກ: ທ່ານຕ້ອງລະບຸລະຫັດຜ່ານໃສ່ຫ້ອງ C2 ຂອງ Sheet”P”
4. File ຕົວຢ່າງ.