insertion image dans fichier excel

insertion image dans fichier excel - VB/VBA/VBS - Programmation

Marsh Posté le 05-10-2009 à 14:54:56    

Bonjour
 
je crée un fichier excel avec des asp mais je n'arive pas à insrérer un fichier image.
J'arrive a faire un tableau excel ou les images sont liées (se lisent si connecté au web) mais lorsque l'on essaie de visualiser le fichier hors connexion les images n'appariassent pas.
Pourriez vous me donner un truc ou une ligne de code pour insérer une image dans une case car avec le code suivant cela ne fonctionne pas.
D'avance merci.
 
Set ExcelApp = CreateObject("Excel.Application" )
ExcelApp.Application.Visible = True
ExcelApp.DisplayAlerts = False
Set ExcelBook = ExcelApp.Workbooks.Open(Server.MapPath("." ) & "\cata.xls" )
ExcelBook.Worksheets(1).Cells(1, 1).Font.size = 10
ExcelBook.Worksheets(1).Cells(1, 1).Font.Bold=True
ExcelBook.Worksheets(1).Cells(1, 1).Value="Région"
ExcelBook.Worksheets(1).Cells(1, 1).Interior.Color = RGB(140,140,140)
ExcelBook.Worksheet.Pictures.Insert("carte.jpg" ).Select
...

Reply

Marsh Posté le 05-10-2009 à 14:54:56   

Reply

Marsh Posté le 08-10-2009 à 15:34:34    

Va voir la liste des paramètre de la méthode insert car je crois qu'il y a moyen de faire avec / sans lien. Le mieux est d'enregistrer la macro à partir du menu, et hop le tour est joué!

Reply

Marsh Posté le 14-10-2009 à 14:51:11    

Bonjour
 
Perso la ligne ExcelBook.Worksheet.Pictures.Insert("carte.jpg" ).Select fonctionne sans souci chez moi, en hors connexion aussi...
 
Question :  
Ton Server.MapPath("." ) & "\cata.xls" renvoie quoi ?
Ton fichier carte.jpg se trouve où ?  
et il se trouve où par rapport à Server.MapPath("." ) & "\cata.xls" ?


Message édité par SuppotDeSaTante le 14-10-2009 à 14:51:47

---------------
Soyez malin, louez entre voisins !
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed