Equivalent VBA de la fonction TEXTE

Le
Vpco
Bonsoir à tous,

Existe t-il l'équivalent de la fonction TEXTE en VBA ?

Merci de vos conseils.

Cordialement.

Excellent
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
h2so4
Le #4243291
bonsoir,

essaie la fonction format()

Format Function Example
This example shows various uses of the Format function to format values
using both named formats and user-defined formats. For the date separator
(/), time separator (:), and AM/ PM literal, the actual formatted output
displayed by your system depends on the locale settings on which the code is
running. When times and dates are displayed in the development environment,
the short time format and short date format of the code locale are used.
When displayed by running code, the short time format and short date format
of the system locale are used, which may differ from the code locale. For
this example, English/U.S. is assumed.

MyTime and MyDate are displayed in the development environment using current
system short time setting and short date setting.

Dim MyTime, MyDate, MyStr
MyTime = #17:04:23#
MyDate = #January 27, 1993#

' Returns current system time in the system-defined long time format.
MyStr = Format(Time, "Long Time")

' Returns current system date in the system-defined long date format.
MyStr = Format(Date, "Long Date")

MyStr = Format(MyTime, "h:m:s") ' Returns "17:4:23".
MyStr = Format(MyTime, "hh:mm:ss AMPM") ' Returns "05:04:23 PM".
MyStr = Format(MyDate, "dddd, mmm d yyyy") ' Returns "Wednesday,
' Jan 27 1993".
' If format is not supplied, a string is returned.
MyStr = Format(23) ' Returns "23".

' User-defined formats.
MyStr = Format(5459.4, "##,##0.00") ' Returns "5,459.40".
MyStr = Format(334.9, "###0.00") ' Returns "334.90".
MyStr = Format(5, "0.00%") ' Returns "500.00%".
MyStr = Format("HELLO", "<") ' Returns "hello".
MyStr = Format("This is it", ">") ' Returns "THIS IS IT".

--

h2so4
play triogical at http://www.triogical.com
"Vpco" news:
Bonsoir à tous,

Existe t-il l'équivalent de la fonction TEXTE en VBA ?

Merci de vos conseils.

Cordialement.

Excel...lent




Garette
Le #4243281
Bonsoir,

Oui.
Format(MyTime, "h:m:s")

"Vpco"
Bonsoir à tous,

Existe t-il l'équivalent de la fonction TEXTE en VBA ?

Merci de vos conseils.

Cordialement.

Excel...lent




JB
Le #4243271
Bonsoir,

Format(expression,format)

Voir aide en ligne avec F1

JB


On 16 mar, 22:34, "Vpco"
Bonsoir à tous,

Existe t-il l'équivalent de la fonction TEXTE en VBA ?

Merci de vos conseils.

Cordialement.

Excel...lent


Modeste
Le #4243261
Bonsour® Vpco avec ferveur ;o))) vous nous disiez :


Existe t-il l'équivalent de la fonction TEXTE en VBA ?


selon l'usage souhaité (mise en forme ou string)

[A1] = Format(Now, "hh:mm")
[A2].Formula = "=TEXT( Now(), ""hh:mm"")"
[A3].FormulaLocal = "=TEXTE(MAINTENANT() ; ""hh:mm"")"
--
--
@+
;o)))

MichDenis
Le #4243221
la fonction Format()

Exemple pour une date

Dim X as String
X = format(date, "d mmm yyyy")

Il y a aussi ceci avec les mêmes arguments de la fonction "Texte()" de la feuille de calcul

x = application.Text()



"Vpco" Bonsoir à tous,

Existe t-il l'équivalent de la fonction TEXTE en VBA ?

Merci de vos conseils.

Cordialement.

Excel...lent
Publicité
Poster une réponse
Anonyme