Macro - Task List (Process Check List)

[enyche]

I'm looking for a macro where I can setup a list of processes (steps to complete a task) with a check box to the left. When the check box is checked I would like for the description of the process to be have a line through it (strikethrough).

If the checkbox won't work...a simple "x" next to the process...to trigger the strikethrough would be ok. Any help is appreciated. Thanks.

 

[J Ericson]

Hey enyche,

This may suit your needs.

When I was messing around with this I was using CheckBoxs from the Form Controls. Blanked out the default text and then assigned this a macro to each checkbox. The code below was for a check box positioned over cell G5 and will affect text in cell H5.

Sub Task_01()

    T = True
    F = False
    
    If Range("H5").Font.Strikethrough = F Then
        Range("H5").Font.Strikethrough = T
    ElseIf Range("H5").Font.Strikethrough = T Then
        Range("H5").Font.Strikethrough = F
    End If

End Sub

Because I don't know too much about VB script there is another concern you should think about. If a user was to manually strikethrough the contents of cell H5 then the checkbox will work in reverse of what you would expect. To prevent this I would suggest locking and protecting the cells that contain text you intend to strikethrough.

HTH,
J Ericson

There is another concern however, if a user manually changes the strikethrough setting in cell H5 via Format Cells or Ctl+5 the check box works in reverse to what's expected. To prevent this you could set all check boxes to clear, clear any strikethrough in your text and then lock and protect the text cells.

 

[enyche]

Perfect...works great...Thanks

Just realized, if I have long list of process descriptions this would take a lot of time to setup...

How about a code for entering "x" (or any other value) in the cell next to the description of the process.

Thanks.