Converteren datum in cel

[aaddegraaf]

Een simpele wijziging met VBA van een datum in meerdere cellen lukt mij niet. Ik heb Excel 2024 en een Windows 11 laptop.
In de betreffende cellen staat een zichtbare waarde van "25 okt."
Deze waarde wil ik wijzigen met VBA in de volgende zichtbare waarde "25-okt-25". Ik gebruik hiervoor de code:
activecell.NumberFormat = "dd-mmm-yy" waarbij activecell dan een aangepaste range moet worden.
De (zichtbare) waarde van de betreffende cel(len) wijzigt hierdoor niet, terwijl als ik in celeigenschappen ga kijken de opmaak aangegeven staat als categorie "Datum" staat en bij Type: "14-mrt-2012" (Nederlands toetsenbord).
Wat doe ik fout en hoe krijg ik dit wel voor elkaar? Bedankt voor je antwoord.
M.vr.gr.,
Aad de Graaf

 

[jverkerk]

Dit zegt chatgpt

Sub FixDatum()
    Dim c As Range
    For Each c In Selection
        c.Value = CDate(c.Value)
        c.NumberFormat = "dd-mmm-yy"
    Next c
End Sub

 

[Tech8]

Een simpele wijziging met VBA van een datum in meerdere cellen lukt mij niet.

Je hebt daar toch geen VBA voor nodig, gewoon via Celopmaak.

Tech8