Problème de format de date dans textebox

re

jai une datte qui remonte d'une feuil dans un textbox1 sur mon userform

exemple 01/01/2016

j'aimerais qu'il affiche l'abregé du jour de cette date dans mon exemple vendredi donc ven

voici mon code qui ne marche pas

Code:

---

1 2 3

TextBox1.Value = Format(TextBox1.Value, "ddd")

---

merci de m'aiguiller car j'ai fait le tour de pas mal de forum mais je n'ai pas trouvé

C'est au moment où tu places la valeur dans la listbox qu'il faut appliquer le format

Code:

---

1 2	TextBox1.Value = Format(Cells(1, 1), "ddd")

---

Merci ca marche bien par contre je ne sais pas pourquoi il me met un point a la fin grande question.

sinon pour un second textbox pareil c'est le meme code code celui ci ?

Code:

---

TextBox2.Value = Format(Cells(1, 2), "ddd")

---

parce que j'en aurais 30 a faire comme ca

En bon français, un écrit en abréviation doit se terminer par un point.

Citation:

---

sinon pour un second textbox pareil c'est le meme code code celui ci ?

---

Si tous les TextBox sont dans le même UserForm et que la valeur à y mettre provient de la même cellule, les TextBoxes peuvent tous être remplis en une seule opération. Voir documentation de l'instruction For Each