En este artículo, usaremos antes de hacer doble clic en el evento de la hoja de trabajo para marcar y desmarcar la celda.
Los datos brutos consisten en algunos alimentos. Queremos marcar los artículos que hemos comprado.
Al hacer doble clic en una celda, se le agregará una marca de verificación. De la misma manera, se puede eliminar haciendo doble clic en él nuevamente.
Explicación del código
Si Target.Column = 3, entonces
El código anterior se usa para restringir que el evento de doble clic se ejecute solo cuando se hace doble clic en la celda de la tercera columna.
Cancelar = Verdadero
El código anterior se usa para evitar que una celda entre en modo de edición.
Target.Font.Name = "Marlett"
El código anterior se utiliza para asignar la fuente Marlett a la celda de destino.
Si Target = "" Entonces
Target = "a"
Demás
Target = ""
Terminara si
El código anterior se utiliza para insertar una marca de verificación y eliminarlo también. En la fuente Marlett, la "a" representa la marca de verificación y el espacio en blanco se utiliza para eliminar la marca de verificación.
Siga a continuación para obtener el código
Option Explicit Private Sub Worksheet_BeforeDoubleClick (ByVal Target As Range, Cancel As Boolean) 'Verificando si la celda de destino está en la tercera columna Si Target.Column = 3 Then' Evitar que la celda entre en modo de edición Cancelar = Verdadero 'Cambiando el tipo de fuente de la celda Target. Font.Name = "Marlett" 'Verificando si el valor de la celda objetivo está en blanco y luego insertando la marca If Target = "" Then Target = "a" Else Target = "" End If End If End Sub
Si te gustó este blog, compártelo con tus amigos en Facebook. Además, puede seguirnos en Twitter y Facebook.
Nos encantaría saber de usted, háganos saber cómo podemos mejorar nuestro trabajo y hacerlo mejor para usted. Escríbanos al sitio de correo electrónico