Bonjour,
j'ai cherché sur l'aide de pc soft et je trouvé le code suivant :
mais le fichier Excel n'etait pas crée
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 IDFicXLS est un xlsDocument UnFichier est une chaîne UnFichier = fRepExe + "\Suivi d'affaires1.xls" IDFicXLS = xlsOuvre(UnFichier, xlsEcriture) SI ErreurDétectée = Faux ALORS Azz est un entier = xlsFeuilleEnCours(IDFicXLS) Info("Feuille en cours dans le fichier Excel : " + Azz) // Changement de feuille SI xlsFeuilleEnCours(IDFicXLS, 2) ALORS Info("La feuille courante a été modifiée.") // Lecture d'une cellule pour test Info(xlsDonnée(IDFicXLS, 11, 2)) SINON Erreur("Le fichier sélectionné ne comporte pas de seconde feuille !") FIN SINON Erreur("Attention ! le fichier est déjà ouvert sur un poste de travail !") FIN
comment créer un ficher Excel ?
merci d'avance.
Partager