Check Mark

I would like to place a "check mark" in a cell, but I'm not sure how to
accomplish this. Can anyone help?

Thanks in advance!
Anthony

Set the cell's font to Marlett, then use the character a.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Anthony Viscomi" <anthonyviscomi@msn.com> wrote in message
news:%23dyXX%23$JGHA.1464@TK2MSFTNGP10.phx.gbl...
> I would like to place a "check mark" in a cell, but I'm not sure how to
> accomplish this. Can anyone help?
>
> Thanks in advance!
> Anthony
>
>

Actually, I was looking to place a "check box" within a cell. Is this
possible?
"Bob Phillips" <bob.phillips@notheretiscali.co.uk> wrote in message
news:O12hMJAKGHA.2696@TK2MSFTNGP14.phx.gbl...
> Set the cell's font to Marlett, then use the character a.
>
> --
> HTH
>
> Bob Phillips
>
> (remove nothere from email address if mailing direct)
>
> "Anthony Viscomi" <anthonyviscomi@msn.com> wrote in message
> news:%23dyXX%23$JGHA.1464@TK2MSFTNGP10.phx.gbl...
>> I would like to place a "check mark" in a cell, but I'm not sure how to
>> accomplish this. Can anyone help?
>>
>> Thanks in advance!
>> Anthony
>>
>>
>
>

Checkboxes are separate to a cell, being objects just as the sheet is an
object. They can be linked to cells, and they can be aligned somewhat to
cells. Try using the cells on the Forms toolbar.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Anthony Viscomi" <anthonyviscomi@msn.com> wrote in message
news:%23$mZ6UAKGHA.360@TK2MSFTNGP12.phx.gbl...
> Actually, I was looking to place a "check box" within a cell. Is this
> possible?
> "Bob Phillips" <bob.phillips@notheretiscali.co.uk> wrote in message
> news:O12hMJAKGHA.2696@TK2MSFTNGP14.phx.gbl...
> > Set the cell's font to Marlett, then use the character a.
> >
> > --
> > HTH
> >
> > Bob Phillips
> >
> > (remove nothere from email address if mailing direct)
> >
> > "Anthony Viscomi" <anthonyviscomi@msn.com> wrote in message
> > news:%23dyXX%23$JGHA.1464@TK2MSFTNGP10.phx.gbl...
> >> I would like to place a "check mark" in a cell, but I'm not sure how to
> >> accomplish this. Can anyone help?
> >>
> >> Thanks in advance!
> >> Anthony
> >>
> >>
> >
> >
>
>

Works great, Thanks!
"Bob Phillips" <bob.phillips@notheretiscali.co.uk> wrote in message
news:uuPAOdAKGHA.524@TK2MSFTNGP09.phx.gbl...
> Checkboxes are separate to a cell, being objects just as the sheet is an
> object. They can be linked to cells, and they can be aligned somewhat to
> cells. Try using the cells on the Forms toolbar.
>
> --
> HTH
>
> Bob Phillips
>
> (remove nothere from email address if mailing direct)
>
> "Anthony Viscomi" <anthonyviscomi@msn.com> wrote in message
> news:%23$mZ6UAKGHA.360@TK2MSFTNGP12.phx.gbl...
>> Actually, I was looking to place a "check box" within a cell. Is this
>> possible?
>> "Bob Phillips" <bob.phillips@notheretiscali.co.uk> wrote in message
>> news:O12hMJAKGHA.2696@TK2MSFTNGP14.phx.gbl...
>> > Set the cell's font to Marlett, then use the character a.
>> >
>> > --
>> > HTH
>> >
>> > Bob Phillips
>> >
>> > (remove nothere from email address if mailing direct)
>> >
>> > "Anthony Viscomi" <anthonyviscomi@msn.com> wrote in message
>> > news:%23dyXX%23$JGHA.1464@TK2MSFTNGP10.phx.gbl...
>> >> I would like to place a "check mark" in a cell, but I'm not sure how
>> >> to
>> >> accomplish this. Can anyone help?
>> >>
>> >> Thanks in advance!
>> >> Anthony
>> >>
>> >>
>> >
>> >
>>
>>
>
>

Hi Anthony

The following code will place a series of checkboxes alongside values in
another column, in Column G in this example.

Sub CreateCheckBoxes()
On Error Resume Next
Dim c As Range, myRange As Range, lastcell As Long
If Application.ScreenUpdating = True Then Application.ScreenUpdating
= False
lastcell = Cells(Rows.Count, 6).End(xlUp).Row
Set myRange = Range("G1:G" & lastcell)
For Each c In myRange.Cells
ActiveSheet.CheckBoxes.Add(c.Left, c.Top, c.Width,
c.Height).Select
With Selection
.LinkedCell = c.Address
.Characters.Text = ""
.Name = "Check" & c.Address
.Display3DShading = True
End With
Next
myRange.Select
Selection.ColumnWidth = 2.15
Application.ScreenUpdating = True
End Sub

After ticking, just check whether value of cell in G is TRUE or FALSE

--
Regards

Roger Govier


"Anthony Viscomi" <anthonyviscomi@msn.com> wrote in message
news:%23$mZ6UAKGHA.360@TK2MSFTNGP12.phx.gbl...
> Actually, I was looking to place a "check box" within a cell. Is this
> possible?
> "Bob Phillips" <bob.phillips@notheretiscali.co.uk> wrote in message
> news:O12hMJAKGHA.2696@TK2MSFTNGP14.phx.gbl...
>> Set the cell's font to Marlett, then use the character a.
>>
>> --
>> HTH
>>
>> Bob Phillips
>>
>> (remove nothere from email address if mailing direct)
>>
>> "Anthony Viscomi" <anthonyviscomi@msn.com> wrote in message
>> news:%23dyXX%23$JGHA.1464@TK2MSFTNGP10.phx.gbl...
>>> I would like to place a "check mark" in a cell, but I'm not sure how
>>> to
>>> accomplish this. Can anyone help?
>>>
>>> Thanks in advance!
>>> Anthony
>>>
>>>
>>
>>
>
>

I don't think you can place a check box in a cell, but you can turn a cell
into a checkbox with this macro I found from another post.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
On Error GoTo sub_exit
If Not Intersect(Target, Range("A1")) Is Nothing Then
With Target
If .Value = "ü" Then
.Value = ""
Else
.Value = "ü"
.Font.Name = "Wingdings"
End If
End With
End If
sub_exit:
Application.EnableEvents = True
End Sub

"Anthony Viscomi" wrote:

> I would like to place a "check mark" in a cell, but I'm not sure how to
> accomplish this. Can anyone help?
>
> Thanks in advance!
> Anthony
>
>
>

This code will make a cell into a checkbox.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
On Error GoTo sub_exit
If Not Intersect(Target, Range("A1")) Is Nothing Then
With Target
If .Value = "ü" Then
.Value = ""
Else
.Value = "ü"
.Font.Name = "Wingdings"
End If
End With
End If
sub_exit:
Application.EnableEvents = True
End Sub


"Anthony Viscomi" wrote:

> I would like to place a "check mark" in a cell, but I'm not sure how to
> accomplish this. Can anyone help?
>
> Thanks in advance!
> Anthony
>
>
>