dag + datum automatisch als tabbladnaam

[tummers50]

Hallo,

Ik krijg mijn excel bestand niet automatisch zo ingesteld dat de tabbladnaam automatisch wordt aangepast in de dag + de datum. Ik krijg helaas alleen de datum te zien.

Dit heb ik ingegeven bij mijn VBA:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$J$4" Then
If Target <> "" Then
On Error Resume Next
ActiveSheet.Name = Target
If Err.Number <> 0 Then _
MsgBox "ongeldige naam"
End If
End If
End Sub

In cel J4 heb ik dan de waarde gezet om de dag en de datum weer te geven.

Heeft er iemand een idee hoe ik hier wel de dag bij te zien krijg (eventueel via een koppeling van 2 cellen??)

P.s. de dag mag ook weergegeven worden in ma, di, wo, etc.

Alvast bedankt!

 

[HSV]

Probeer het zo eens.
Als je alleen een datum zet in cel J4.

ActiveSheet.Name = Format(Target, "ddd dd-mm-yyyy")