Discussion :

[Oreo_]

Bonjour à tous,

J'ai déclaré les variables annee, mois et jour comme "String"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim jour As String, mois As String, annee As String

Voici ma formule :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Range("A1").Select
ActiveCell.FormulaR1C1 = "=DATE(" & annee & ";" & mois & ";" & jour & ")"

Le message d'erreur : "Erreur d'exécution : '1004' : Erreur définie par l'application ou par l'objet" apparait.

Merci d'avance pour votre aide!

[enernaej]

Bonjour,

Je vous propose de remplacer le

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.FormulaR1C1 = "=DATE(" & annee & ";" & mois & ";" & jour & ")"

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.FormulaLocal = "=DATE(" & annee & ";" & mois & ";" & jour & ")"

Ca ira déjà mieux.

[Oreo_]

Merci beaucoup, ça fonctionne!