Dans le domaine du génie civil, nous sommes souvent amenés à réaliser des calculs afin de déterminer la déformée d’une poutre. 

Pour vous simplifier la vie, vous, ingénieur génie civil, nous avons réaliser un certains nombre de tutos afin que vous puissiez réaliser cette même fiche de calcul.

Dans un premier temps, avant de vous lancer dans l’écriture du code VBA, nous allons vous donner quelques bases d’informatique et de mise en page dont vous allez avoir besoin.

Les variables

Si la variable est déclarée au début d’une procédure (Sub), elle ne peut être utilisée que dans cette même procédure. La valeur de la variable n’est pas conservée après l’exécution de la procédure

Pour déclarer une variable :

  • Dim : déclaration de la variable
  • ma_variable : nom choisi pour cette variable (sans espaces)
  • As : déclaration du type de la variable
  • Integer : type de la variable

Ecriture en langage VBA

Dim ma_variable AsInteger

Les procédures


Ecriture en langage VBA

Sub macro_test()
EndSub

Les fonctions

Ecriture en langage VBA

Function carre(nombre)

EndFunction

La principale différence entre une procédure Sub et Function est la valeur retournée par la fonction.

Il faut penser à déclarer les variables utilisées dans les fonctions et procédures.

Les arguments

Le type de variable indique la nature de son contenu. Il existe différent type de variables :

NomTypeDétails
ByteNumériqueNombre entier de 0 à 255.
IntegerNumériqueNombre entier de -32’768 à 32’767.
LongNumériqueNombre entier de – 2’147’483’648 à 2’147’483’647.
CurrencyNumériqueNombre à décimale fixe de -922’337’203’685’477.5808 à 922’337’203’685’477.5807.
SingleNumériqueNombre à virgule flottante de -3.402823E38 à 3.402823E38.
DoubleNumériqueNombre à virgule flottante de -1.79769313486232D308 à 1.79769313486232D308.
StringTexteTexte.
DateDateDate et heure.
BooleanBooleanTrue (vrai) ou False (faux).

Les arguments permettent d’utiliser des valeurs d’une procédure dans une sous procédure

Les conditions

Quelque opérateurs utils:

ANDet[condition1] AND [condition2]Les 2 conditions doivent être vraies
ORou[condition1] OR [condition2]Au moins 1 des 2 conditions doit être vraie
NOTfauxNOT [condition1]La condition doit être fausse
If [CONDITION] Then 'SI condition 1 validée ALORS 
   'Instruction 1
ElseIf [CONDITION 2] Then 'SINON, SI condition 2 validée ALORS 
   'Instruction 2
Else 'SINON
   'Instruction 3

Pour ajouter plusieurs conditions à la suite

If [CONDITION 1] Then ' => SI condition 1 validée ALORS
   'Instructions 1
ElseIf [CONDITION 2] Then ' => SINON, SI condition 2 validée ALORS
   'Instructions 2
Else ' => SINON
   'Instructions 3

OU

Select Case quand il y a beaucoup de conditions

Select Case variableatester
    Case Is =       
       commentaire =
    Case Is =       
      commentaire =
    Case Is =       
       commentaire =



Catégories : VBA

0 commentaire

Laisser un commentaire

Votre adresse de messagerie ne sera pas publiée. Les champs obligatoires sont indiqués avec *