pictogram Auteur: Patrick Biker
Date: 18 mars 2006
Maj : 21 Mars 2015

Des exemples d'utilisation des fonctions du WLangage

Rien de tel qu'un exemple pour comprendre une fonction de WLangage. Dans cette section, vous trouverez des exemples simples.

Des exemples évolués, où la fonction est utilisée en contexte, sont également disponible sur ce site.

Aller à la page des exemples évolués

xlsDonnee (en anglais xlsData)

// Ouverture d'un fichier XLS
IdFichierXLS = xlsOuvre("C:\MonRépertoire\Fichier.XLS")
SI IdFichierXLS <> -1 ALORS
   // Récupération de la valeur d'une cellule
   ResDonnée = xlsDonnée (IdFichierXLS, 3, 4)
   ...
FIN


Début de la page

xlsFerme (en anglais xlsClose)

// Ouverture d'un fichier XLS
IdFichierXLS = xlsOuvre("C:\MesRépertoires\Fichier.XLS")
...
// Fermeture du fichier XLS
xlsFerme (IdFichierXLS)


Début de la page

xlsMsgErreur (en anglais xlsMsgError)

// Ouverture d'un fichier XLS
IdFichierXLS = xlsOuvre("C:\MesRépertoires\Fichier.XLS")
SI IdFichierXLS <> -1 ALORS
   ...
SINON
   // Erreur survenue sur le fichier XLS
   ResErreur = xlsMsgErreur (IdFichierXLS)
   ...
FIN


Début de la page

xlsNbcolonne (en anglais xlsNbColumn)

// Ouverture d'un fichier XLS
IdFichierXLS = xlsOuvre("C:\MonRépertoire\Fichier.XLS")
SI IdFichierXLS <> -1 ALORS
   // Nombre de colonnes
   ResNbColonne = xlsNbColonne (IdFichierXLS)
   ...
FIN


Début de la page

xlsNbLigne (en anglais xlsNbRow)

// Ouverture d'un fichier XLS
IdFichierXLS = xlsOuvre("C:\MonRépertoire\Fichier.XLS")
SI IdFichierXLS <> -1 ALORS
   // Nombre de lignes
   ResNbLignes = xlsNbLigne (IdFichierXLS)
   ...
FIN


Début de la page

xlsOuvre (en anglais xlsOpen)

IdFichierXLS est un entier
IdFichierXLS = xlsOuvre ( ComplèteRep ( fRepExe ()) + "GPACS.XLS" )
SI
IdFichierXLS <> - 1 ALORS
   Info ( "Le fichier XLS a été ouvert" )
SINON
   Info ( xlsMsgErreur ( IdFichierXLS ))
FIN


Début de la page

xlsTitreColonne (en anglais xlsColumnTitle)

// Ouverture d'un fichier XLS
IdFichierXLS = xlsOuvre("C:\MonRépertoire\Fichier.XLS")
SI IdFichierXLS <> -1 ALORS
  // Récupération de l'intitulé d'une colonne
  ResTitreColonne = xlsTitreColonne (IdFichierXLS, 4)
  ...
FIN


Début de la page

xlsTypeColonne (en anglais xlsColumnType)

// Ouverture d'un fichier XLS
IdFichierXLS = xlsOuvre("C:\MonRépertoire\Fichier.XLS")
SI IdFichierXLs <> -1 ALORS
   // Type des données saisies
   ResTitreColonne = xlsTypeColonne (IdFichierXLS, 4)
   ...
FIN


Début de la page

xlsVersion (en anglais xlsVersion)

// Ouverture d'un fichier XLS
IdFichierXLS = xlsOuvre("C:\MonRépertoire\Fichier.XLS")
...
// Version d'Excel
ResVersion = xlsVersion (IdFichierXLS)


Début de la page