În acest articol, vom folosi înainte de dublu clic evenimentul din foaia de lucru pentru a verifica și debifa celula.
Datele brute constau din unele produse alimentare. Dorim să bifăm acele articole pe care le-am cumpărat.
Dacă faceți dublu clic pe o celulă, bifă va fi adăugată la aceasta. În același mod, poate fi eliminat făcând dublu clic pe el din nou.
Explicarea codului
Dacă Target.Column = 3 Atunci
Codul de mai sus este utilizat pentru a restricționa evenimentul cu dublu clic pentru a se executa numai atunci când celula din cea de-a 3-a coloană face dublu clic.
Anulare = Adevărat
Codul de mai sus este utilizat pentru a împiedica intrarea unei celule în modul de editare.
Target.Font.Name = "Marlett"
Codul de mai sus este utilizat pentru a atribui fontul Marlett celulei țintă.
Dacă Țintă = "" Atunci
Target = "a"
Altfel
Țintă = ""
End If
Codul de mai sus este folosit pentru a introduce o bifă și a o elimina, de asemenea. În fontul Marlett, „a” reprezintă semnul de bifare și golul este utilizat pentru a elimina marca de bifare.
Vă rugăm să urmați codul de mai jos
Opțiune Explicit Private Private Worksheet_BeforeDoubleClick (ByVal Target As Range, Cancel As Boolean) „Verificarea dacă celula țintă se află în a treia coloană Dacă Target.Column = 3 Apoi„ Prevenirea intrării celulei în modul Editare Anulare = Adevărat ”Modificarea tipului de font al celulei Țintă. Font.Name = "Marlett" 'Verificarea dacă valoarea celulei țintă este goală, apoi introducerea bifează Dacă Țintă = "" Apoi Țintă = "a" Altfel Țintă = "" Sfârșit Dacă Sfârșit Dacă Sfârșit Sub
Dacă ți-a plăcut acest blog, distribuie-l prietenilor tăi de pe Facebook. De asemenea, ne puteți urmări pe Twitter și Facebook.
Ne-ar plăcea să aflăm de la dvs., să ne anunțați cum putem îmbunătăți munca noastră și o putem îmbunătăți. Scrieți-ne pe site-ul de e-mail