Bonjour a tous
Voici un bout de code :
je ne connais pas les options du code pour le faire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 .................. SI xl=Null ALORS xl=allouer un objet OLE "Excel.Application" SI xl=Null ALORS Erreur("Impossible de lancer Excel") RETOUR FIN SI xl <> Null ALORS xl>>Visible=Faux xl>>WorkBooks>>Open("C:\MODELE.xlsx") xl>>Range("B1")>>Value="ANNEE ACADEMIQUE : "<---Mettre en gras et changement de police en Times new xl>>ActiveWorkBook>>SaveAs(monfichierfinal) ....
Merci a tous
Partager