U ovom članku ćemo prije dvostrukog klika na radnom listu provjeriti i poništiti ćeliju.
Sirovi podaci sastoje se od nekih namirnica. Želimo označiti te stavke koje smo kupili.
Kada dvaput kliknete ćeliju, u nju će se dodati oznaka kvačice. Na isti način, može se ukloniti dvostrukim klikom na nju.
Objašnjenje koda
Ako je Target.Column = 3 Tada
Gornji kôd koristi se za ograničavanje izvođenja događaja dvostrukog klika samo kada se dvaput klikne na ćeliju u 3. stupcu.
Odustani = Istina
Gornji kôd koristi se za sprječavanje ulaska ćelije u način uređivanja.
Target.Font.Name = "Marlett"
Gornji kôd koristi se za dodjeljivanje Marlettovog fonta ciljnoj ćeliji.
Ako je Target = "" Tada
Cilj = "a"
Drugo
Cilj = ""
Završi ako
Gornji kôd koristi se za umetanje kvačice i njezino uklanjanje. U Marlettu font "a" predstavlja oznaku kvačice, a prazna se koristi za uklanjanje oznake kvačice.
Molimo slijedite dolje za kôd
Opcija Eksplicitan privatni pod -radni list_BeforeDoubleClick (ByVal Target As Range, Cancel As Boolean) 'Provjerava je li ciljna ćelija u trećem stupcu If Target.Column = 3 Zatim' Spriječi prelazak ćelije u način uređivanja Otkaži = Istina 'Promjena vrste fonta ćelije Target. Font.Name = "Marlett" 'Provjerava se je li ciljna vrijednost ćelije prazna pa se unosi kvačica If Target = "" Then Target = "a" Else Target = "" End If End If End Sub
Ako vam se dopao ovaj blog, podijelite ga sa svojim prijateljima na Facebooku. Također, možete nas pratiti na Twitteru i Facebooku.
Voljeli bismo vas čuti, javite nam kako možemo poboljšati svoj rad i učiniti ga boljim za vas. Pišite nam na web stranici e -pošte