Salut chaire développeur
Je suis en coure de réaliser une application.
Dans une partie je dois créer un fichier Excel avec des champs et style personnalisé.
Alor j’ai réer le fichier vide comme un fichier modèle.
Et pour travailler avec je le copier et je modifie les valeurs.
Mon problème est que le fichier ne garde pas la mise en forme (les couleurs le cadre……)
Une proposition si vous voulez
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 MonFich est une chaîne=sRepertoire+"CAT_"+sTypeTransport+".xlsx" fCopieFichier(fRepExe()+"\Fichier_Modele.xlsx",MonFich) //retour FichEx est un xlsDocument FichEx=xlsOuvre(MonFich,xlsEcriture) xlsFeuilleEnCours(FichEx,1) FichEx[2,"B"]="Val1" FichEx[3,"B"]="Val2" FichEx[4,"B"]="Val3" FichEx[5,"B"]=DateVersChaîne(DateSys()) FichEx[2,"E"]="Val4" xlsSauve(FichEx) xlsClose(FichEx)
Partager