I den här artikeln kommer vi att använda före dubbelklickhändelse i kalkylbladet för att kontrollera och avmarkera cellen.
Rådata består av några livsmedel. Vi vill markera de objekt som vi har köpt.
Om du dubbelklickar på en cell kommer kryssmärket att läggas till i den. På samma sätt kan den tas bort genom att dubbelklicka på den igen.
Kodförklaring
Om Target.Column = 3 Då
Ovanstående kod används för att begränsa dubbelklickhändelsen att köras endast när cellen i den tredje kolumnen dubbelklickas.
Avbryt = Sant
Ovanstående kod används för att förhindra att en cell hamnar i redigeringsläge.
Target.Font.Name = "Marlett"
Ovanstående kod används för att tilldela målcellen Marlett -teckensnitt.
Om Target = "" Då
Mål = "a"
Annan
Mål = ""
Avsluta om
Ovanstående kod används för att infoga en bock och ta bort den också. I Marlett -teckensnitt representerar "a" bockmarkering och tomt används för att ta bort bockmarkeringen.
Följ koden nedan
Alternativ Explicit Private Sub Worksheet_BeforeDoubleClick (ByVal Target As Range, Cancel As Boolean) 'Kontrollera om målcellen finns i den tredje kolumnen Om Target.Column = 3 Sedan' Förhindra att cellen går in i redigeringsläge Avbryt = sant 'Ändrar typ av cellmål. Font.Name = "Marlett" 'Kontrollerar om målcellens värde är tomt och infogar kryss om Target = "" Då Target = "a" Else Target = "" End If End If End Sub
Om du gillade den här bloggen, dela den med dina vänner på Facebook. Du kan också följa oss på Twitter och Facebook.
Vi vill gärna höra från dig, låt oss veta hur vi kan förbättra vårt arbete och göra det bättre för dig. Skriv till oss på e -postwebbplatsen