Hoofdletters in kolom D

[Evelthoven]

Goedenavond,

Ik heb een klein deeltje van een groot bestand van mijn werk bijgesloten, met daarin opgenomen de vraag over hoofdletters in kolom D.

Heeft iemand een oplossing?

Met vriendelijke groeten,
Eric

 

[edmoor]

Dit achter dat werkblad en het document opslaan als document met macro's:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 4 Then
        Application.EnableEvents = False
        Target.Value = UCase(Target.Value)
        Application.EnableEvents = True
    End If
End Sub

 

[Evelthoven]

Hallo Edmoor,

Dit is het! Precies wat ik nodig had. Werkt perfect.

Bedankt


Eric