[RESOLU] Utilisation Datepart

MaximeRoth · 18 Octobre 2012

Bonjour à tous,

J'ai un problème concernant l'utilisation de la fonction Datepart de VBA.
Je souhaite placer dans 2 cellules, le mois et l'année de la date d'aujourd'hui.
Après avoir fait quelques recherches j'ai trouvé ceci:

Code:

    'Date mois
    Cells(ActiveCell.Row, 4).Value = DatePart("m", today)
    'Date année
    Cells(ActiveCell.Row, 3).Value = DatePart("yyyy", today)

Or je me retrouve avec 1899 comme année et 12 comme mois.
Malgré l'aide Excel j'ai du mal à comprendre le fonctionnement de la fonction DatePart...

A+

Max

Pierrot93 · 18 Octobre 2012

Re : Utilisation Datepart

Bonjour,

remplace "today" par "Date"...

bon après mdi
@+

Edition : bonjour Dull

Dull · 18 Octobre 2012

Re : Utilisation Datepart

Salut MaximeRoth, le Forum

Essaye plutôt comme cela

'Date mois
Cells(ActiveCell.Row, 4).Value = DatePart("m", Date)
'Date année
Cells(ActiveCell.Row, 3).Value = DatePart("yyyy", Date)

EDITION: Salut Pierrot

Bonne Journée

MaximeRoth · 18 Octobre 2012

Re : Utilisation Datepart

Salut Dull, Pierrot93,

Merci pour votre aide ça marche à la perfection. (je me sens quand même un peu bête pour cette erreur surtout après avoir essayé, today, aujourdhui... et ne pas avoir pensé à Date........)

A+

Misange · 18 Octobre 2012

Re : [RESOLU] Utilisation Datepart

Attention à datepart si tu l'utilises pour extraire des semaines aux normes européennes, il y a un bug avec quelques dates. Sinon pas de pb.

[RESOLU] Utilisation Datepart

MaximeRoth

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

Dull

XLDnaute Barbatruc

MaximeRoth

XLDnaute Junior

Misange

XLDnaute Barbatruc

Discussions similaires