Thanks for everyone's suggestions...
I was able to make a control box macro to do it...

Private Sub CheckBox1_Click()
If CheckBox1 Then
Application.AutoCorrect.AddReplacement What:=".", Replacement:=":"
Else
Application.AutoCorrect.DeleteReplacement What:="."
End If
End Sub

This seems to work well.


"DB74" wrote:

I am 10-keying times into a spread sheet. Is there a way to make a .
represent : for time so I can 10-key it faster?