Datepicker

G

Guest

Guest

• 2 Mars 2011

• #2

Re : Datepicker

Bonjour,

Code:

Dim MyDate as date
MyDate = DTPicker1.Value

A+

 

Vote positif 0 Vote négatif

E

egman

XLDnaute Occasionnel

• 2 Mars 2011

• #3

Re : Datepicker

Bonjour Hasco

merci pour ta réponse aussi rapide
J'essaye et te tiens au courant

A+

 

Vote positif 0 Vote négatif

E

egman

XLDnaute Occasionnel

• 2 Mars 2011

• #4

Re : Datepicker

Je viens d'essayer ton code mais j'ai toujours un problème au niveau du format....

Sheets("Feuil1").Cells(65536, 1).End(xlUp).Offset(1, 0).Value = Format(MyDate, "mm/dd/yyyy")

Cliquez pour agrandir...

C'est le Format de Format(MyDate...) qu'il aime pas

Tu vois d'où çà peut venir ?

D'avance merci

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 2 Mars 2011

• #5

Re : Datepicker

Re,

Si MyDate est déclarée en Date

Code:

with Sheets("Feuil1").Cells(65536, 1).End(xlUp).Offset(1, 0)
     .Value = MyDate
      .numberFormat="mm/dd/yyyy" ' Peut-être inutile suivant le cas
end with

A+

 

Vote positif 0 Vote négatif

E

egman

XLDnaute Occasionnel

• 2 Mars 2011

• #6

Re : Datepicker

Ah OK je vois çà et te tiens au courant

MERCI

A+

 

Vote positif 0 Vote négatif

E

egman

XLDnaute Occasionnel

• 2 Mars 2011

• #7

Re : Datepicker

Effectivement cela fonctionne seul hic au tableau c'est que lorsque je veux rester sur ligne de données déjà sur la Feuil1 et que je veux changer la date à l'aide du Datepicker il incrémente systématiquement la nouvelle date sur la ligne du dessous ! ! !
En fait je pensais me servir du Datepicker soit en mode Modification soit en mode Nouvelle entrée.

Je sais pas si je suis bien clair.

Merci

 

Vote positif 0 Vote négatif