conversion date en nombre

[rafou29]

Bonjour,

Je cherche à connaitre le code qui me permet de convertir des dates en nombres (ex: 3/8/2010 = 8 mars 2010 devient 40245.00).
J'y arrive parfaitement en modifiant les données sur Excel avec NOMBRE mais je souhaite le faire automatiquement dans ma macro.

Private Sub CommandButton58_Click()

Sheets("Sheet1").Select
Range("C1:D30,F1:F30,R1:R30").Select
Selection.Copy
Sheets("Sheet3").Select
Range("B2").Select
ActiveSheet.Paste

End Sub

Mes dates sont sur ma Sheet1 dans la colonne C.

Cette parade me permettra d'afficher mes valeurs sur un histogramme qui ne supporte pas d'avoir pour une même date différentes ordonnées 🙁

Cette solution que je vous demande me servira de roue de secours car je n'arrive pas à trouver de solution à mon "principal" problème (cf: Pb histogrammes)

Merci de votre attention !

 

[Pierrot93]

Re : conversion date en nombre

Bonjour Rafou

de toute evidence les dates sont stckées par Excel comme des nombres, il me semble qu'il suffit de modifier le format de la colonne en question... A voir si j'ai bien compris ton problème...

Sheets("Sheet1").Columns(3).NumberFormat = (0)

bonne fin d'après midi
@+

 

[rafou29]

Re : conversion date en nombre

Merci c'est ce exactement ce que je voulais faire 😀

 

[CB60]

Re : conversion date en nombre

Bonjour
Ta copie peut être plus simple:

Sheets("sheet1").Range("C1:D30,F1:F30,R1:R30").Copy Destination:=Sheets("sheet3").Range("B2")

 

[rafou29]

Re : conversion date en nombre

Merci sa va me permettre d'alléger un peu mes codes !

 

[rafou29]

Re : conversion date en nombre

Est-ce que tu sais Pierrot, quel est le code pour afficher mes dates sur l'histogramme et non les valeurs ?

 

[Pierrot93]

Re : conversion date en nombre

Re, bonjour Bruno

sans voir ton graph, difficile, mais essaye peut être click droit sur l'axe => format de l'axe => "onglet nombre", tu choisis le format de date que tu veux.... ou s'il s'agit des étiquettes click droit sur les étiquettes => format des étiquettes de données => même punition que précédemment.... En espérant que ce soit également valide sous 2007...

bon après midi
@+

 

[rafou29]

Re : conversion date en nombre

Excuse moi je me suis mal exprimé : est-ce que tu connais le code qui permet d'afficher mes dates sur l'histogramme au lieu des valeurs ?

 

[Pierrot93]

Re : conversion date en nombre

Bonjour,

mets un petit fichier en pièce jointe (format xls), pas encore 2007... avec un petit graphique représentant bien les données que tu veux modifier... car en l'état il y a plusieurs possibilités....

bon après midi
@+

 

[rafou29]

Re : conversion date en nombre

Voici ci-joint mon graphe et le hic c'est que je ne peux pas le modifier via excel car je ne saurais jamais la longueur de mes tableaux de valeur donc il faut que toutes les solutions soient automatisés de manière à être corriger via VB.

 

[Pierrot93]

Re : conversion date en nombre

Re,

regarde le code ci-dessous si il peut t'aider :

With Sheet3.ChartObjects(1).Chart.Axes(xlCategory).TickLabels
    .NumberFormat = "m/d/yyyy"
    .Orientation = 45
End With

@+

 

[rafou29]

Re : conversion date en nombre

Sa ne marchait pas mais en le modifiant un peu sa passe !

With ActiveChart.Axes(xlCategory).TickLabels
    .NumberFormat = "m/d/yyyy"
    .Orientation = 45
    End With

Merci et par hasard tu ne saurais pas comment faire en sorte que lorsque j'ai plusieurs ordonnées pour la même date (abscisse), mon histogramme me les empile plutôt que de les superposer ?
(Même sans utiliser VBA je n'y arrive pas)

 

[Pierrot93]

Re : conversion date en nombre

Re,

en l'état, pas sûr que cela soit possible directement, et ce uniquement pour certaines dates, je pense qu'il faut passer par une phase intermédiaire en créant peut être par un TCD en goupant les données par date.... A moins que 2007 offre d'autres possibilités....

 

[rafou29]

Re : conversion date en nombre

Je comprend ton raisonnement mais je ne suis pas assez calé en Excel pour savoir comment faire en passant par une "phase intermédiaire".

Qu'est-ce que sa veut dire TCD ?

 

[Pierrot93]

Re : conversion date en nombre

Re,

un tableau croisé dynamique, tu peux même y lier un graphique dynamique, maintenant sous 2007 je ne sais pas comment on le construit....