Opmaak van de cel werkt niet

[youdeni]

Beste Mensen,

Ik heb in een bestand (zie ook bijlage) een aantal velden waar de datum in vermeld staat. Echter Excel ziet het veld niet als datum.
Als ik op het veld ga staan zie ik dat er een apostrof voor de datum staat '11-12-12 Ook in de cellen waar het formaat dd-mm-jj staat wordt deze
vooraf gegaan door een apostrof. Weet iemand hoe ik die apostrof kan verwijderen? Ik he het al geprobeerd met zoek en vervang Maar Excel kan de cel dan niet vinden.
Aangezien het werkelijke bestand super groot is, wil ik dit het liefst met een macro doe. Al vast bedankt!!

Bekijk bijlage Vraag_forum.xlsx

 

[spaarie]

Apostrofe betekent voor Excel tekst

Met deze code worden de datums omgezet naar datums, maar de dd-mm-jjjj blijven tekst want dit is ook tekst

    For Each c In Sheets("Blad1").Range("H2:K" & Range("K" & Rows.Count).End(xlUp).Row)
        c.Value = Format(c.Value, "mm-dd-yyyy")
    Next

Format staat als mm-dd-yyyy, anders draait Excel de maand en de dag om

 

[JeanPaul28]

Met =SUBSTITUEREN() , in jou geval een macro maken en een snel toets

 

[youdeni]

Beste Spaarie,

Super Bedankt!!! Is het mogelijk om de macro zo aan te passen dat de cellen waarin: dd-mm-jj staat daarvan de inhoud te verwijderen?

 

[spaarie]

Tuurlijk

Sub Spaarie()
    For Each c In Sheets("Blad1").Range("H2:K" & Range("K" & Rows.Count).End(xlUp).Row)
        If c <> "dd-mm-jj" Then
            c.Value = Format(c.Value, "mm-dd-yyyy")
        Else
            c.ClearContents
        End If
    Next
End Sub

 

[youdeni]

super