Tech Support Guy banner
Status
Not open for further replies.
1 - 4 of 4 Posts

· Registered
Joined
·
102 Posts
Discussion Starter · #1 ·
I have set up a spreadsheet that contains a list of things to do. I want to be able to enter the lette Y beside the ones that have been completed. Is there anyway to change the letter to a check mark.

I have already tried the autocorrect function, but this then changes all the letter Y in my orther spreadsheets.

Any help would be appreciated.

Thanks
 

· Registered
Joined
·
358 Posts
Select the cells before doing find/replace. That limits how much changes.
 

· Registered
Joined
·
4,936 Posts
You can manually format the cell in "Wingdings" font and use ALT + 0252

This method is tedious because you would need to format each cell individualy before entering the keystrokes. If you format the entire column in Wingdings font then your cells contacting the "Y" character will change to something else. If you decide to use this method make sure to keep the ALT key pressed while entering the numbers and also make sure to use the numbers on the number keypad and not the numbers that are at the top of the keyboard beneath the function keys.

It's probably easier to use a macro to do this. Just record a blank macro using the macro recorder and replace the code with the macro below. You can assign whatever keyboard shortcut you want to run the macro.

Code:
Public Sub Checkmark()
Activecell.Value = Chr(252)
Activecell.Font.Name = "Wingdings"
End Sub
If you have multiple cells to do at once you can manually select your range of cells and use this macro

Code:
Public Sub Checkmark()

For Each vCell In Selection.Cells
If UCase(vCell.Value) = "Y" Then
vCell.Value = Chr(252)
vCell.Font.Name = "Wingdings"
End If
Next vCell

End Sub
Regards,
Rollin
 
1 - 4 of 4 Posts
Status
Not open for further replies.
Top