Fonction Format

Renvoie une donnée de type Variante (Chaîne) contenant une expression mise en forme selon les instructions incluses dans une expression de format.

Avertissement Il y a un problème avec l’utilisation de cette fonction. Le dernier lundi de certaines années civiles peut être retourné en tant que semaine 53 alors qu’il devrait être la semaine 1. Pour obtenir plus d’informations et une solution de contournement, voir Les fonctions Format ou PartDate peuvent renvoyer un numéro de semaine incorrect pour le dernier lundi de l’année.

Voir quelques exemples

Syntaxe

format( *expression [, format ] [, firstdayofweek ] [, firstweekofyear ] )

La syntaxe de la fonction Format contient les arguments suivants :

Argument	Description
expression	Obligatoire. Toute expression valide.
Mise en forme	Facultatif. Expression de format nommée ou définie par l’utilisateur valide.
premierjoursem	Facultatif. Constante spécifiant le premier jour de la semaine.
premièresem	Facultatif. Constante qui spécifie la première semaine de l’année.

    

Paramètres

L’argument de mise en forme peut utiliser divers paramètres, selon le type de données de l’argument d’expression . Pour plus d’informations sur les expressions de format valides, consultez les articles répertoriés dans le tableau suivant.

Pour les expressions qui utilisent ce type de données...	Voir l’article
N’importe quel type	Propriété Format
Date/heure	Mettre en forme un champ de date et d’heure
Numérique	Mettre en forme un champ numérique ou monétaire
Texte et mémo	Mettre en forme un champ de texte
Oui/non	Format, propriété - Type de données Yes/No

    

L’argument firstdayofweek a les paramètres suivants :

Constante	Valeur	Description
vbUseSystem	0	Utiliser le paramètre d’API NLS.
Dimanche Vb	1	Dimanche (par défaut)
vbMonday	2	Lundi
vbTuesday	3	Mardi
vbWednesday	4	Mercredi
vbThursday	5	Jeudi
vbFriday	6	Vendredi
vbSamedi	7	Samedi

    

L’argument firstweekofyear a les paramètres suivants :

Constante	Valeur	Description
vbUseSystem	0	Utiliser le paramètre d’API NLS.
vbFirstJan1	1	Commence par la semaine du 1er janvier (par défaut).
vbFirstFourDays	2	Commencez par la première semaine qui compte au moins quatre jours dans l’année.
vbFirstFullWeek	3	Commencez par la première semaine complète de l’année.

    

Remarques

Appliquer une mise en forme	Procédez comme suit
Chiffres	Utilisez des formats numériques nommés prédéfinis ou créez des formats numériques définis par l’utilisateur.
Dates et heures	Utilisez des formats de date/heure nommés prédéfinis ou créez des formats de date/heure définis par l’utilisateur.
Numéros de série de date et heure	Utilisez des formats de date et d’heure ou des formats numériques.
Chaînes de caractères	Créez vos propres formats de chaîne définis par l’utilisateur.

    

Si vous essayez de mettre en forme un nombre sans spécifier le format, Format offre une fonctionnalité similaire à la fonction Str , bien qu’elle soit compatible avec le niveau international. Toutefois, les nombres positifs mis en forme en tant que chaînes à l’aide de Format n’incluent pas d’espace de début réservé au signe de la valeur ; ceux convertis à l’aide de Str conservent l’espace de début.

Si vous mettez en forme une chaîne numérique non localisée, vous devez utiliser un format numérique défini par l’utilisateur pour obtenir l’apparence souhaitée.

Si le calendrier est grégorien, la signification des symboles d’expression de mise en forme reste inchangée. Si le calendrier est de type Hijri, tous les symboles de format de date (par exemple, jjjj, mmmm, aaaa) ont la même signification mais s’appliquent au calendrier Hijri. Les symboles de format restent en anglais ; Les symboles qui entraînent l’affichage du texte (par exemple, AM et PM) affichent la chaîne (anglaise ou arabe) associée à ce symbole. La gamme de certains symboles change lorsque le calendrier est hégirien.

Symbole	Plage
j	1-30
jj	1-30
ss	1-51
mmm	Affiche les noms complets des mois (les noms des mois Hijri n’ont pas d’abréviations).
a	1-355
aaaa	100-9666

Exemples

Utiliser la fonction Format dans une expression Vous pouvez utiliser Format partout où vous pouvez utiliser des expressions. Par exemple, vous pouvez l’utiliser dans une requête dans le cadre d’un alias de champ ou dans la propriété Source contrôle d’une zone de texte d’un formulaire ou d’un état. Les exemples suivants illustrent une expression que vous pouvez utiliser dans la propriété Filtre d’un état pour limiter la sortie aux enregistrements de la semaine précédente.

format([Date],"ww »)=Format(Now(),"ww »)-1

Dans cet exemple, la source d’enregistrement de l’état comporte un champ intitulé Date, qui contient la date à laquelle chaque enregistrement particulier a été modifié et qui est utilisé dans l’état. Lorsque vous exécutez le rapport, ses résultats sont filtrés pour n’afficher que les enregistrements pour lesquels la semaine de la valeur dans le champ Date (Format([Date],"ss])) est égale à la semaine précédente (Format(Now(),"ww »)-1).

Utiliser la fonction Format dans le code VBA 

Cet exemple illustre diverses utilisations de la fonction Format pour mettre en forme des valeurs en utilisant des formats nommés et définis par l’utilisateur. Pour le séparateur de date (/), le séparateur d’heure ( :) et le littéral AM/PM, la sortie mise en forme réelle affichée par votre système dépend des paramètres régionaux de l’ordinateur sur lequel le code est exécuté. Lorsque les heures et les dates sont affichées dans l’environnement de développement, le format d’heure courte et le format de date courte des paramètres régionaux du code sont utilisés. Lorsqu’ils sont affichés en exécutant du code, le format d’heure courte et le format de date courte des paramètres régionaux du système sont utilisés, qui peuvent différer des paramètres régionaux du code. Pour cet exemple, les paramètres régionaux de l’anglais américain sont supposés.

MyTime et MyDate sont affichés dans l’environnement de développement à l’aide des paramètres de courte durée et de date courtes du système actuels.

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".

      

Utilisation d’une mise en forme avec des chaînes vides

Dans Microsoft Access 2.0 et versions antérieures, vous pouviez utiliser la fonction Format pour renvoyer une valeur pour une chaîne nulle et une autre pour une valeur. Par exemple, vous pouvez utiliser une expression de format telle que la suivante avec la fonction Format pour renvoyer la valeur de chaîne appropriée à partir du code :

Dim varX As Variant
Dim varStrX As Variant
' Assign some value to varStrX and pass to Format function.
varX = Format(varStrX, "@;ZLS;Null")

Dans les versions 97 et ultérieures de Microsoft Access, vous devez tester séparément le cas Null , puis renvoyer la valeur appropriée en fonction du résultat. Par exemple, vous pouvez utiliser la fonction VraiFaux dans une expression avec la fonction Format , comme suit :

varX = IIf(IsNull(varStrX),"Null", Format(varStrX, "@;ZLS"))

Cette modification s’applique uniquement lorsque vous utilisez la fonction Format pour mettre en forme une chaîne selon qu’il s’agit d’une chaîne nulle ou d’une valeur Null. Les autres expressions de mise en forme utilisées avec la fonction Format continuent de fonctionner comme dans les versions précédentes.

Si vous convertissez une base de données de Microsoft Access version 2.0 et antérieure vers Microsoft Access 2002 ou une version ultérieure, vous devez modifier le code pour tester séparément la casse Null.

Fonctions de chaîne et comment les utiliser