moguaii
Messages postés13Date d'inscriptionmardi 6 janvier 2004StatutMembreDernière intervention28 octobre 2011 23 juil. 2009 à 23:07
Joli code, mais quand même super compliqué :s
La même fonction en plus simple (et de moi :p) :
------------------------------------------------------------------------------------------
Function PCase(strInput)
colInput = Split(strInput)
For i = 0 to Ubound(colInput)
colInput(i) = UCase(Left(colInput(i), 1)) & LCase(_
Right(colInput(i), Len(colInput(i)) - 1))
Next
PCase = Join(colInput)
End Function
------------------------------------------------------------------------------------------
23 juil. 2009 à 23:07
La même fonction en plus simple (et de moi :p) :
------------------------------------------------------------------------------------------
Function PCase(strInput)
colInput = Split(strInput)
For i = 0 to Ubound(colInput)
colInput(i) = UCase(Left(colInput(i), 1)) & LCase(_
Right(colInput(i), Len(colInput(i)) - 1))
Next
PCase = Join(colInput)
End Function
------------------------------------------------------------------------------------------
Voilà ;)