XL 2016 date sur en tete de tableau

[richardlion]

Bonjour a tous, j'ai un tableau structuré (fichier en PJ) avec des entête

quand je saisie la formule en D2 =aujourd'hui j'ai une date en 1900.

quel est la solution?

 

[Victor21]

Bonjour.

Pas de formule dans les en-têtes des tableaux structurés.

 

[ChTi160]

Bonsoir le Fil
Peut être ainsi :

Private Sub Workbook_Open()
' Vérifier si le tableau structuré "t_BDD" existe
    On Error Resume Next   
    Set tbl = Range("t_BDD").ListObject   
    On Error GoTo 0   
    ' Si le tableau existe, insérer la date du jour dans la quatrième colonne de l'en-tête
    If Not tbl Is Nothing Then
        tbl.HeaderRowRange.Cells(1, 4).Value = Date
       Else
        MsgBox "Le tableau structuré 't_BDD' n'existe pas , vbExclamation
    End If
End Sub

on entre la date à l'ouverture du Fichier
Jean marie

 

[richardlion]

Bonsoir le Fil
Peut être ainsi :

Private Sub Workbook_Open()
' Vérifier si le tableau structuré "t_BDD" existe
    On Error Resume Next  
    Set tbl = Range("t_BDD").ListObject  
    On Error GoTo 0  
    ' Si le tableau existe, insérer la date du jour dans la quatrième colonne de l'en-tête
    If Not tbl Is Nothing Then
        tbl.HeaderRowRange.Cells(1, 4).Value = Date
       Else
        MsgBox "Le tableau structuré 't_BDD' n'existe pas , vbExclamation
    End If
End Sub

on entre la date à l'ouverture du Fichier
Jean marie

Bonjour, merci a vous je teste