Constantes Basic

Constantes utilisées dans les programmes Basic

Constantes booléennes

Nom

Type

Valeur

True

Boolean

1

False

Boolean

0


Exemple :


            Dim bPositive as Boolean
            bPositive = True
        

Constante mathématique

Nom

Type

Valeur

Pi

Double

3.14159265358979


Exemple :


            Function Rad2Deg( aRad as Double) As Double
             Rad2Deg = aRad * 180.00 / Pi
            End Function
        

Constantes objet

Nom

Type

Utilisation

Empty

Variant

La valeur Empty indique que la variable n'est pas initialisée.

Null

null

Indique que la variable ne contient aucune donnée.

Nothing

Object

Assigne l'objet Nothing à une variable pour supprimer une assignation antérieure.


Exemple :


            SubExampleEmpty
                Dim sVar As Variant
                sVar = Empty
                Print IsEmpty(sVar) ' Renvoie True
            End Sub
            Sub ExampleNull
                Dim vVar As Variant
                MsgBox IsNull(vVar)
            End Sub
            Sub ExampleNothing
                Dim oDoc As Object
                Set oDoc = ThisComponent
                Print oDoc.Title
                oDoc = Nothing
                Print oDoc ' Erreur
            End Sub
        

MsgBox Named Constants

Constante nommée

Valeur entière

Définition

MB_OK

0

Afficher uniquement le bouton OK.

MB_OKCANCEL

1

Afficher les boutons OK et Annuler.

MB_ABORTRETRYIGNORE

2

Afficher les boutons Abandonner, Réessayer et Ignorer.

MB_YESNOCANCEL

3

Afficher les boutons Oui, Non et Annuler.

MB_YESNO

4

Afficher les boutons Oui et Non.

MB_RETRYCANCEL

5

Afficher les boutons Réessayer et Annuler.

MB_ICONSTOP

16

Ajouter l'icône Message critique à la boîte de dialogue.

MB_ICONQUESTION

32

Ajouter l'icône Requête d'avertissement à la boîte de dialogue.

MB_ICONEXCLAMATION

48

Ajouter l'icône Message d'avertissement à la boîte de dialogue.

MB_ICONINFORMATION

64

Ajouter l'icône Message d'information à la boîte de dialogue.

128

Désigner le premier bouton de la boîte de dialogue comme bouton par défaut.

MB_DEFBUTTON2

256

Désigner le deuxième bouton de la boîte de dialogue comme bouton par défaut.

MB_DEFBUTTON3

512

Désigner le troisième bouton de la boîte de dialogue comme bouton par défaut.


GetAttr Named Constants

Constante nommée

Valeur

Définition

ATTR_NORMAL

0

Fichiers normaux.

ATTR_READONLY

1

Fichiers en lecture seule.

ATTR_HIDDEN

2

Fichier caché

ATTR_SYSTEM

4

Fichier système

ATTR_VOLUME

8

Renvoie le nom du volume

ATTR_DIRECTORY

16

Renvoie le nom du répertoire uniquement.

ATTR_ARCHIVE

32

Fichier modifié depuis la dernière sauvegarde (attribut d'archivage).


Type de données Named Constants

valeurs
TypeName

Constante
Named

VarType
values

Type de variable

…()

8192

Matrice de variables

Boolean

11

variable Boolean

Byte

17

variable Byte

Date

V_DATE

7

variable Date

Currency

V_CURRENCY

6

variable Currency

Double

V_DOUBLE

5

Variable à virgule flottante double précision

Error

11

variable Error type

Integer

V_INTEGER

2

variable Integer

Long

V_LONG

3

variable entière Long

Object

9

variable Object

Single

V_SINGLE

4

Variable à virgule flottante simple précision

String

V_STRING

8

variable String

Variant

12

variable Variant (peut contenir tous les types spécifiés par la définition)

Empty

V_EMPTY

0

variable Variant non initialisée

Null

V_NULL

1

Absence de données valides


Constantes supplémentaires VBA

Les constantes suivantes sont disponibles lorsque le mode de compatibilité est activé

warning

Cette constante, fonction ou objet est activé avec l'instruction Option VBASupport 1 placée avant le code exécutable dans un module.


Couleur VBA Named Constants

Constante nommée

Rouge, Vert, Bleu
composition

vbBlack

RGB(0, 0, 0)

vbBlue

RGB(0, 0, 255)

vbCyan

RGB(0, 255, 255)

vbGreen

RGB(0, 255, 0)

vbMagenta

RGB(255, 0, 255)

vbRed

RGB(255, 0, 0)

vbYellow

RGB(255, 255, 0)

vbWhite

RGB(255, 255, 255)


Type de variable Named Constants

Constante nommée

Valeur décimale

vbArray

8192

vbBoolean

11

vbByte

17

vbCurrency

6

vbDataObject

13

vbDate

7

vbDecimal

14

vbDouble

5

vbEmpty

0

vbError

10

vbInteger

2

vbLong

3

vbNull

1

vbObject

9

vbSingle

4

vbString

8

vbUserDefinedType

36

vbVariant

12


FormatDateTime VBA Named Constants

Constante nommée

Valeur

Description

vbGeneralDate

0

Affiche une date et/ou une heure tel que défini dans les paramètres de date généraux du système. S'il s'agit uniquement d'une date, l'heure n'est pas affichée ; s'il s'agit uniquement d'une heure, la date n'est pas affichée.

vbLongDate

1

Affiche une date utilisant le format de date long spécifié dans les paramètres régionaux de l'ordinateur.

vbShortDate

2

Affiche une date utilisant le format de date court spécifié dans les paramètres régionaux de l'ordinateur.

vbLongTime

3

Affiche une heure telle que définie dans les paramètres de temps long du système.

vbShortTime

4

Affiche une heure utilisant le format 24 heures (hh:mm).


StrConv VBA Named Constants

Conversion

Valeur

Description

vbUpperCase

1

Convertit les caractères de Text en majuscules.

vbLowerCase

2

Convertit les caractères de Text en minuscules.

vbProperCase

3

Convertit la première lettre de chaque mot dans Text en majuscules.

vbWide

4

Convertit les caractères étroits (demi-chasse) dans le Text en caractères larges (pleine chasse).

vbNarrow

8

Convertit les caractères larges (pleine chasse) dans Text en caractères étroits (demi-chasse).

vbKatakana

16

Convertit les caractères Hiragana dans Text en caractères Katakana.

vbHiragana

32

Convertit les caractères Katakana dans Text en caractères Hirarana.

vbUnicode

64

Convertit les caractères de Text en caractères Unicode en utilisant la page de code par défaut du système.

vbFromUnicode

128

Convertit les caractères de Text de Unicode à la page de code par défaut du système.


WeekDayName VBA Named Constants

Valeur

Constante VBA

Description

0

vbUseSystemDayOfWeek

Utiliser les paramètres locaux du système

1

vbSunday

Dimanche (par défaut)

2

vbMonday

Lundi

3

vbTuesday

Mardi

4

vbWednesday

Mercredi

5

vbThursday

Jeudi

6

vbFriday

Vendredi

7

vbSaturday

Samedi


Miscellaneous VBA Named Constants

Constante nommée

Valeur hexadécimale (décimale)

Description

vbTrue

-1

Partie de l'énumération vbTriState

vbFalse

0

Partie de l'énumération vbTriState

vbUseDefault

-2

Partie de l'énumération vbTriState

vbCr

\x0D (13)

CR - Retour à la ligne

vbCrLf

\x0D\x0A (13 10)

CRLF - Retour à la ligne et saut de ligne

vbFormFeed

\x0c (12)

FF - Saut de page

vbLf

\x0A (10)

LF - Saut de ligne

vbNewLine

\x0D\x0A (13 10) pour Windows

\x0A (10) pour les autres systèmes

LF ou CRLF

vbNullString

""

Chaîne vide

vbTab

\x09 (9)

HT - Tabulation horizontale

vbVerticalTab

\x0B (11)

VT - Tabulation verticale


Aidez-nous !