Logo Hardware.com.br
Basole
Basole Geek Registrado
945 Mensagens 596 Curtidas
#4 Por Basole
08/09/2016 - 15:08
É as vezes as caixas de seleção é pequeno demais para o seu gosto e o excel não permite alterar o tamanho da "caixinha".
No exemplo abaixo (img) eu simulei uma caixa de seleção, utilizando uma Label ActiveX (ou Rotulo se preferir ).
Alterei as propriedades BackStyle para Transparente e a fonte para Wingdings Tamanho 48 e o caracter (Alt+ 0168)


Imagem
E para "marcar e Desmarcar" o meu Checkbox tabajara eu utilizei a macro abaixo:

[code=vb]
Private Sub Label1_Click()
If Me.Label1.Caption = Chr(254) Then
Me.Label1.Caption = Chr(168)
Else
Me.Label1.Caption = Chr(254)
End If
End Sub
[/code]

Anexos

© 1999-2024 Hardware.com.br. Todos os direitos reservados.
Imagem do Modal