Salut les amis. Je travaille sur un projet qui nécessite l'importation de données à partir de fichiers Excel, pour lequel j'utilise la fonction HImportXLS. En plus des champs de données disponibles dans le fichier Excel, je souhaite ajouter 2 à 3 champs supplémentaires à chaque enregistrement importé, mais je ne peux pas le faire avec la fonction HImportXLS, car elle importe d'abord tous les enregistrements du fichier Excel en laissant les autres champs vides dans la base de données. Y a-t-il un moyen d'ajouter 2 à 3 champs supplémentaires lors de l'importation de chaque enregistrement (ligne Excel) avec la fonction HImportXLS ? Par exemple, j'ai 5 champs similaires dans tous les fichiers Excel, mais je veux ajouter deux champs distincts comme "Nom du champ" et "Lieu du champ" en plus de chaque enregistrement... S'il vous plaît, suggérez une solution si possible.
Bonjour Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens! Une importation se base sur l'existant, ensuite cela devient de la manipulation de données ;-) Donc en deux temps ;-) Bien Cordialement
Bonjour ça peut se faire par programmation L'exemple de code suivant pourrait t'inspirer Code (Text): //Importation de la liste des clients IdFichierXLS est un entier FichierExcel est une chaîne i,NbLigne,NbColonne est un entier FichierExcel="C:/Mes Projets/GRH/AGENT.XLSX" SI fFichierExiste(FichierExcel) ALORS HCréation(AGENTS) IdFichierXLS = xlsOuvre("c:/Mes Projets/GRH/AGENT.XLSX") NbLigne=xlsNbLigne(IdFichierXLS) HOuvre(AGENTS) POUR i=1 A NbLigne SI IdFichierXLS <> -1 ALORS AGENTS.MATRICULE= xlsDonnée (IdFichierXLS,i,1,Vrai) AGENTS.NOM_ET_PRENOMS= xlsDonnée (IdFichierXLS,i,2,Vrai) AGENTS.DATE_NAISSANCE= ChaîneVersDate(xlsDonnée(IdFichierXLS,i,3,Vrai)) AGENTS.DATE_DEPART_RETRAITE= ChaîneVersDate(xlsDonnée(IdFichierXLS,i,4,Vrai)) AGENTS.SEXE=xlsDonnée (IdFichierXLS,i,5,Vrai) AGENTS.CNPS_CGRAE=xlsDonnée (IdFichierXLS,i,6,Vrai) AGENTS.DIPLME_OU_NIVEAU=xlsDonnée (IdFichierXLS,i,7,Vrai) AGENTS.SIGLE_FONCTION=xlsDonnée (IdFichierXLS,i,8,Vrai) AGENTS.LIBELLE_CATEGORIE=xlsDonnée (IdFichierXLS,i,9,Vrai) AGENTS.ECHELON=xlsDonnée (IdFichierXLS,i,10,Vrai) AGENTS.TYPE_AGENT=xlsDonnée (IdFichierXLS,i,11,Vrai) AGENTS.DATE_ERE_PRISE_SERVICE=ChaîneVersDate(xlsDonnée(IdFichierXLS,i,12,Vrai)) AGENTS.TYPE_DE_CONTRAT=xlsDonnée (IdFichierXLS,i,13,Vrai) AGENTS.SITUATION_MATRIMONIALE=xlsDonnée (IdFichierXLS,i,14,Vrai) AGENTS.NOMBRE_ENFANTS=xlsDonnée (IdFichierXLS,i,15,Vrai) AGENTS.LIBELLEDULIEU=xlsDonnée (IdFichierXLS,i,16,Vrai) AGENTS.IDFONCTION_AGENT=xlsDonnée (IdFichierXLS,i,17,Vrai) HAjoute(AGENTS) FIN FIN SINON Erreur("Le fichier Excel AGENT.xls n'existe pas") FIN Source : Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens! By Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!
Bonjour, Si tu veux ajouter 2 colonnes dans la table qui va récupérer les données XL, il suffit d'ajouter 2 titres de colonnes à ta feuille. Code (Windev): oMonClasseur est un xlsDocument oMonClasseur=Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!("C:\Users\boite\Documents\Developpement\MesProjets\Projets windev\WD 25\AideForum25\Exe\Aide Exe\DocumentUtilisateur\Test.xlsx") oMonClasseur[1,Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(oMonClasseur)+1]="NleCol1" //On passe à n+1 colonnes oMonClasseur[1,Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(oMonClasseur)+1]="NleCol2" Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(oMonClasseur) Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(oMonClasseur) Attention HImporteXLS devra être utilisée avec l'option himpCréation