Probleme d'enregistrement de date

bonsoir

la code suivant :

With ActiveSheet.Range("H4,L3")
    .Value = .Value
End With

me permet de recopier la valeur des cellules H4 et L3 depuis ma feuille active vers un classeur d'archivage , L3 contient la formule de date =aujourdhui() , lors de l'enregistrement de ma feuille vers le classeur d'archivage j'obtiens une date mais aberrante ; par exemple je passe de 09 octobre 2011 sur ma feuille active à 27 novembre 2203 sur ma feuille enregistrée !!

à quoi cela peut il etre du?

Vous remerciant pour toute explication

Bonsoir

Il me semble que je t'avais modifié une macro car tu avais le même problème

https://forum.excel-pratique.com/post147709.html#p147719

Je pense que l'association With avec une zone composée de plusieurs cellules pose problème avec .Value = .Value

Donc essayes

  With ActiveSheet
    .Range("H4").Value = .Range("H4").Value
    .Range("L3").Value = .Range("L3").Value
  End With

Ou alors en définissant une zone d'un seul tenant (si c'est possible dans ton contexte)

  With ActiveSheet.Range("H1:L4")
    .Value = .Value
  End With

Merci pour ce conseil , ca marche en effet tres bien !!!

bonne soirée à toi