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

Entradas más populares de este blog

Ejemplo de suma Pascal

Solucion al error collation desconocida: 'utf8mb4_0900_ai_ci'