how to write check symbol with click action in excel
Si ocupas poner un select con mejor estilo en excel aconsejo cambia los valores por medio del siguiente código:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Application.EnableEvents = False
With Target
If .Address = Range("D7").Address Then
Select Case .Value
Case ""
.Value = ChrW(&H2713)
Case ChrW(&H2713)
.Value = ""
End Select
End If
End With
Application.EnableEvents = True
End Sub
Donde tu defines los rangos donde deseas que se realicen los cambios.
Y mejoras el estilo como te parezca con las opciones por defecto del excel.
Comentarios
Publicar un comentario