Format date personnalisés par VBA

[Nashpuss]

Bonjour,

Dans le fichier suivant j'essaye de saisir dans une cellule une date via une Userform, et que cette date soit au format avec marqué "LV: " devant la date.
Mon code marche bien dans le premier cas sans Userform, et sans les autres trucs que je veux faire, en appuyant sur le bouton 2
Mais quand j'ai l'intégralité de ma userform (Commandbouton1), ca ne fonctionne pas, il faut double-cliquer ensuite sur la cellule pour que le "LV: " apparaisse.

J'ai l'impression que dans le 2eme cas, il considère que c'est un format texte au départ.

Pourquoi? Comment résoudre ça?

Je vous remercie à l'avance

 

[tototiti2008]

Re : Format date personnalisés par VBA

Bonjour Nashpuss,

personnellement, moi je mettrais le format comme ça :

[C15000].End(xlUp).NumberFormat = Chr(34) & var1 & Chr(34) & "dd/mm/yyyy"

les guillemets sont importantes dans le format

Mais ce n'est pas de là que vient ton soucis :

en écrivant la valeur de ton Userform (Textbox), Excel n'interprète pas ça comme une date, mais comme un texte

peut-être comme ça :

.Offset(0, 2).Value = CDate(DateCible)

 

[camarchepas]

Re : Format date personnalisés par VBA

Bonjour,

Voici , en fonction de ce que j'ai compris .....

 

[Nashpuss]

Re : Format date personnalisés par VBA

Merci tototiti2008, ca marche impec!
Merci aussi Camarchepas, même si je prefere que le LV soit dans le format, pour faire des calculs sur date après...