je viens juste de tester voila mon code :
// Tentative de récupération de l'objet Excel en mémoire
xl est un objet OLE dynamique = ObjetActif("Excel.Application")
// Allocation d'un objet Excel si non-trouvé
SI xl=Null ALORS xl=allouer un objet OLE "Excel.Application"
xl>>Visible=Faux // Excel n'apparait pas à l'écran
// Ouverture du document
xl>>WorkBooks>>Open(SAI_Saisie1)
// Récupération du contenu d'une cellule d'Excel
gsLenomd=xl>>Range("B"+IP)>>Value
gsLenom=Remplace(gsLenomd,"'","''")
xl>>ActiveSheet>>Rows(2)>>Interior>>Color = RVB(0,255,255)
à l'ouverture de mon fichier excel j'ai pas la couleur attendu

Partager