still learning
Well-known Member
- Joined
- Jan 15, 2010
- Messages
- 843
- Office Version
- 365
- Platform
- Windows
Hi
How do I change this macro to have A:A and B:B change to upper case?
for some reason, my brain won't work today !!!!
Mike
How do I change this macro to have A:A and B:B change to upper case?
VBA Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Application.EnableEvents = False
Target.Value = WorksheetFunction.Substitute(WorksheetFunction.Proper(WorksheetFunction.Substitute(Target, "'", "z-z")), "z-Z", "'")
Application.EnableEvents = True
End If
End Sub
Mike