Write only first letter in row VBA

[KlausW]

Hi every one
I have a challenge
In an Excel sheet I use for work planning, you write T for service, S for sailed and F for free.
In row 35.
It also goes very well, but when I write T on a Tuesday or Thursday, it will say Tuesday or Thursday, and if I write S on a Sunday, it will say Sunday, and if I write F on a Friday, it will say Friday . Is there a VBA solution so that Excel only writes the first letter.
Any help will be appreciated
Best Regards
Klaus W

 

[KlausW]

I'm not sure if I understood correctly, but try this macro in the worksheet code module.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.CountLarge > 1 Then Exit Sub
    Application.EnableEvents = False
    If Intersect(Target, Range("C35:I35")) Is Nothing Then Exit Sub
    Target = Left(Target, 1)
    Application.EnableEvents = True
End Sub

Just as it should be, thanks a lot. Have a nice day. Best regards Klaus W

 

[mumps]

You are very welcome.
@Alex Blakenburg
Thank you for your explanation. I suspected that was the issue.