Date excel VBA
Résolu
chewbi47
Messages postés
14
Statut
Membre
-
chewbi47 Messages postés 14 Statut Membre -
chewbi47 Messages postés 14 Statut Membre -
Bonjour,
Je vous expose mon probleme,
j'ai besoin de mettre l'annee, le mois et le jour de la date courante dans des cellules excel.
Mon probleme n'est pas au niveau de la demarche mais de la date, excel ne me renvoie pas du tout la date d'aujourd'hui ! que faire ?
Je vous met la partie de codage VBA pour plus de clarte :
Range("A1").Select
ActiveCell.FormulaR1C1 = Year(today)
Range("A2").Select
ActiveCell.FormulaR1C1 = Month(today)
Range("A3").Select
ActiveCell.FormulaR1C1 = Day(today)
Dans les cellules A1, A2 et A3, j' ai respectivement 1899, 4 et 10
que faire ? erreur de syntaxe ? erreur de date systeme (lorsque j'utilise la fonction aujourd'hui directement dans les cellules j'obtiens la bonne date) ?
PS : desole si le post existe deja, si tel est le cas donnez moi le lien svp...
nb : pas d'accent sur mes lettres car j'utilise un clavier "qwerty"
Merci d'avance pour vos reponses
Windows XP / Excel 2010
Je vous expose mon probleme,
j'ai besoin de mettre l'annee, le mois et le jour de la date courante dans des cellules excel.
Mon probleme n'est pas au niveau de la demarche mais de la date, excel ne me renvoie pas du tout la date d'aujourd'hui ! que faire ?
Je vous met la partie de codage VBA pour plus de clarte :
Range("A1").Select
ActiveCell.FormulaR1C1 = Year(today)
Range("A2").Select
ActiveCell.FormulaR1C1 = Month(today)
Range("A3").Select
ActiveCell.FormulaR1C1 = Day(today)
Dans les cellules A1, A2 et A3, j' ai respectivement 1899, 4 et 10
que faire ? erreur de syntaxe ? erreur de date systeme (lorsque j'utilise la fonction aujourd'hui directement dans les cellules j'obtiens la bonne date) ?
PS : desole si le post existe deja, si tel est le cas donnez moi le lien svp...
nb : pas d'accent sur mes lettres car j'utilise un clavier "qwerty"
Merci d'avance pour vos reponses
Windows XP / Excel 2010
A voir également:
- Date excel VBA
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Nombre de jours entre deux dates excel - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
2 réponses
bonjour
ceci devrait aller
et si tu veux les formules
bonne suite
ceci devrait aller
Range("A1").Value = Year(Now)
Range("A2").Value = Month(Now)
Range("A3").Value = Day(Now)
et si tu veux les formules
Range("A4").FormulaLocal = "=ANNEE(AUJOURDHUI())"
Range("A5").FormulaLocal = "=MOIS(AUJOURDHUI())"
Range("A6").FormulaLocal = "=JOUR(AUJOURDHUI())"
bonne suite
Comme tu débutes, un petit truc qui aurait pu t'alerter : le T de today ne s'est pas mis en majuscule. Ce n'est donc pas un mot clé connu de vba
eric