Prev: Remove Duplicate Numbers in One Cell
Next: search text files for a certain word
From: JayDe on 17 Jan 2010 04:46
Thank you guy's

This did the trick


JayDe



"Gord Dibben" wrote:

> Expanding upon the macro that Dave Peterson wrote at the URL you were
> pointed to................
>
> Select the range of cells to the right of your list.
>
> List of items in A1:A20
>
> Select B1:B20 and run the macro.
>
> Sub testme()
> Dim mycell As Range
> For Each mycell In Selection
> On Error Resume Next
> ActiveSheet.CheckBoxes("cb_" & mycell.Address(False, False)).Delete
> On Error GoTo 0
> With mycell
> With ActiveSheet.CheckBoxes.Add(.Left, .Top, .Width, .Height)
> .Name = "cb_" & mycell.Address(False, False)
> .Caption = "Agree"
> End With
> End With
> Next
> End Sub
>
>
> Gord Dibben MS Excel MVP
>
> On Sat, 16 Jan 2010 05:42:01 -0800, JayDe <JayDe(a)discussions.microsoft.com>
> wrote:
>
> >Hi
> >
> >I have a list in Excel 2007. I want to put a square to the right of some of
> >the list items. How can I do this with VBA.
> >
> >The end user will see the list on a printout with square/checkbox in the
> >right column. The idea is that the end user should go thrue the list and
> >mark/check the items that he agrees on
> >
> >Regards
> >JayDe
> >Norway
>
> .
>
First  |  Prev  | 
Pages: 1 2
Prev: Remove Duplicate Numbers in One Cell
Next: search text files for a certain word