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

Exemples évolués

Chaque exemple montre une utilisation pratique de la fonction du WLangage.

Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.

Revenir à la page des exemples évolués


Le code suivant permet de récupérer le contenu d'une cellule d'un fichier XLS. Les lignes et les colonnes entièrement vides sont prises en compte (booléen Faux ). Le fichier XLS est sélectionné avec la fonction fSélecteur .



// Déclaration des variables
ResDonnée est une chaîne
FichierXLS est une chaîne
IdFichierXLS est un entier

// Sélection du fichier XLS
FichierXLS = fSélecteur("", "", "Sélection d'un fichier XLS", ...
             "Fichier XLS" + TAB + "*.XLS", "XLS", fselOuvre+fselExiste )
// Ouverture du fichier sélectionné
IdFichierXLS = xlsOuvre(FichierXLS)
SI IdFichierXLS <> -1 ALORS
    // Récupération du contenu d'une cellule
    ResDonnée = xlsDonnée (IdFichierXLS, 3, 4, Faux )
    SI ResDonnée <> xlsDonnéeErreur ALORS
        SI ResDonnée = "" ALORS
           // La cellule est vide
           Info("La cellule est vide")
        SINON
           // Affichage du contenu de la cellule
           Info("Le contenu de la cellule est : " + ResDonnée)
        FIN
    SINON
        // Affichage du message d'erreur si la récupération n'a pas été effectuée
        Erreur(xlsMsgErreur(IdFichierXLS))
    FIN
SINON
   // Affichage du message d'erreur si l'ouverture n'a pas été effectuée
   Erreur(xlsMsgErreur(IdFichierXLS))
FIN