Time Value Format

bonjour j'ai un tout petit problème avec ceci

Code:

---

mCellule1 = TimeValue(Format(Left(mCellule1, 2), ":") & Right("00", 2))

---

avoir en case 2 avoir 2 chiffres de mcellule1 les deux points et deux zéro
pouvez corriger svp

Code:

---

mCellule1 = mCellule1 & ":00"

---