cs_Cartouche
Messages postés3Date d'inscriptionvendredi 15 novembre 2002StatutMembreDernière intervention19 mai 2005
-
28 juin 2004 à 09:25
cs_ITALIA
Messages postés2169Date d'inscriptionvendredi 20 avril 2001StatutMembreDernière intervention30 juin 2009
-
28 juin 2004 à 10:05
Salut,
Dans un programme VB, je souhaite automatiser l'ouverture d'un fichier xls le plus simplement possible. Pour cela je pensais écrire une commande shell:
Shell ("G:\Tempo\toto.xls")
ou
Shell ("excel G:\Tempo\toto.xls")
mais je me suis rendu compte qu'il fallait mettre le chemin complet et en dur de l'exécutable excel.exe:
Le problème est que mon VB doit tourner sur des postes hétérogènes en terme d'installation et par conséquent le chemin du fichier excel.exe n'est pas toujours le même.
Est-ce que quelqu'un aurait une solution simple à me proposer?
cs_ITALIA
Messages postés2169Date d'inscriptionvendredi 20 avril 2001StatutMembreDernière intervention30 juin 20099 28 juin 2004 à 10:05
je ne fais pas comme ca :
avant tous dans Projet...Références cocher la case Microsoft excel 8.0 Object Library ou une autre plus récentes...
ensuite dans ton code :
Dim xlBook As Excel.Workbook
Dim xlApp As Excel.Application
CheminFichier="C:\Italia\Italia.xls"
Set xlApp = New Excel.Application
With xlApp
xlBook = .Workbooks.Open(FileName:=CheminFichier, ReadOnly:=False, Editable:=True) ' Français
End With
xlApp.Visible = True