Hello, I have a user who is asking if it is possible to create a custom
checkbox control for use inside of Excel. This new checkbox control is
essentially a checkbox control that has other graphics around the checkmark
other than a square.

For instance, he need to have a triangle that has a clickable checkmark
inside it. He needs a circle with a clickable checkmark inside as well as a
couple of other shapes that have a clickable checkmark inside (no square
around the checkbox). I've tried to put a regular checkbox on top of a
graphic but you have to deal with the square corners of the checkbox even if
it's set to transparent.

Anyone seen any code or otherwise on how to create a custom or add-in that
would do what I describe?

Thanks
Jim

Jim

Create a circle (oval) from the Drawing Toolbar. Format the autoshape
(right click) and set the font to Wingdings (and the size and boldness to
suit) and set the alignment to Center for both horizontal and vertical.

Paste this code into a standard module

Sub CheckCircle()

With Sheet1.Shapes(1).TextFrame
If .Characters.Text = Chr$(252) Then
.Characters.Text = ""
Else
.Characters.Text = Chr$(252)
End If
End With

End Sub

Right click on the autoshape and choose "assign macro" and assign
CheckCircle to it. Whenever you click the circle, a check mark should
appear and disappear alternately. You can also experiment with different
fonts and different numbers in the Chr$() function to find a check mark more
to your liking.

--
Dick Kusleika
MVP-Excel
www.dailydoseofexcel.com
Jim wrote:
Hello, I have a user who is asking if it is possible to create a
custom checkbox control for use inside of Excel. This new checkbox
control is essentially a checkbox control that has other graphics
around the checkmark other than a square.

For instance, he need to have a triangle that has a clickable
checkmark inside it. He needs a circle with a clickable checkmark
inside as well as a couple of other shapes that have a clickable
checkmark inside (no square around the checkbox). I've tried to put
a regular checkbox on top of a graphic but you have to deal with the
square corners of the checkbox even if it's set to transparent.

Anyone seen any code or otherwise on how to create a custom or add-in
that would do what I describe?

Thanks
Jim

Dick, you are a genius. I insist you take the rest of the day off.
Just tell them I said so!


Thanks!

Jim



"Dick Kusleika" wrote in message
...
Jim

Create a circle (oval) from the Drawing Toolbar. Format the autoshape
(right click) and set the font to Wingdings (and the size and boldness to
suit) and set the alignment to Center for both horizontal and vertical.

Paste this code into a standard module

Sub CheckCircle()

With Sheet1.Shapes(1).TextFrame
If .Characters.Text = Chr$(252) Then
.Characters.Text = ""
Else
.Characters.Text = Chr$(252)
End If
End With

End Sub

Right click on the autoshape and choose "assign macro" and assign
CheckCircle to it. Whenever you click the circle, a check mark should
appear and disappear alternately. You can also experiment with different
fonts and different numbers in the Chr$() function to find a check mark
more to your liking.

--
Dick Kusleika
MVP-Excel
www.dailydoseofexcel.com
Jim wrote:
Hello, I have a user who is asking if it is possible to create a
custom checkbox control for use inside of Excel. This new checkbox
control is essentially a checkbox control that has other graphics
around the checkmark other than a square.

For instance, he need to have a triangle that has a clickable
checkmark inside it. He needs a circle with a clickable checkmark
inside as well as a couple of other shapes that have a clickable
checkmark inside (no square around the checkbox). I've tried to put
a regular checkbox on top of a graphic but you have to deal with the
square corners of the checkbox even if it's set to transparent.

Anyone seen any code or otherwise on how to create a custom or add-in
that would do what I describe?

Thanks
Jim