Tässä artikkelissa käytämme ennen laskentataulukon kaksoisnapsautustapahtumaa solun tarkistamiseen ja valinnan poistamiseen.
Raakatiedot koostuvat joistakin elintarvikkeista. Haluamme merkitä rastiin ne tuotteet, jotka olemme ostaneet.
Kun solua kaksoisnapsautetaan, siihen lisätään rasti. Samalla tavalla se voidaan poistaa kaksoisnapsauttamalla sitä uudelleen.
Koodin selitys
Jos Target.Column = 3 Sitten
Yllä olevaa koodia käytetään rajoittamaan kaksoisnapsautustapahtuman suorittaminen vain, kun kolmannen sarakkeen solua kaksoisnapsautetaan.
Peruuta = Totta
Yllä olevaa koodia käytetään estämään solua pääsemästä muokkaustilaan.
Target.Font.Name = "Marlett"
Yllä olevaa koodia käytetään kohdistamaan Marlett -fontti kohdesoluun.
If Target = "" Sitten
Kohde = "a"
Muu
Kohde = ""
Loppu Jos
Yllä olevaa koodia käytetään lisäämään rasti ja poistamaan se myös. Marlett -kirjasimessa ”a” edustaa rasti- merkkiä ja tyhjää käytetään poistamaan rasti.
Seuraa koodia alla
Vaihtoehto Explicit Private Sub Worksheet_BeforeDoubleClick (ByVal Target as Range, Cancel as Boolean) 'Tarkistetaan, onko kohdesolu kolmannessa sarakkeessa If Target.Column = 3 Sitten' Estä solun siirtyminen muokkaustilaan Peruuta = Tosi 'Solun fonttityypin muuttaminen Kohde. Font.Name = "Marlett" 'Tarkistetaan onko kohdesolun arvo tyhjä ja lisätään rasti If If Target = "" Then Target = "a" Else Target = "" End If End Jos End Sub
Jos pidit tästä blogista, jaa se ystävillesi Facebookissa. Voit myös seurata meitä Twitterissä ja Facebookissa.
Haluaisimme kuulla sinusta, kerro meille, kuinka voimme parantaa työtämme ja parantaa sitä sinulle. Kirjoita meille sähköpostitse