bonjour,

je voudrais recuperer les valeurs d'une cellule dans un fichier excel est mettre la valeur dans mon application VBA developer sur Visio

j'ai le chemin du point .xls dans la variable "chemin"
mais je vois pas comment je prend le contenu du champs A1,1 du fichier de mon chemin

un peu d'aide svp

merci

re,

ce code me permet d'ouvrir mon fichier

Code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Dim AppExcel
Dim Fichier
Fichier = c:\test.xls
 
Set AppExcel = CreateObject("Excel.Application")
AppExcel.Visible = True
 
AppExcel.Workbooks.Open (Fichier)
Set AppExcel = Nothing
maintenant je voudrais recuperer la valeur de la cellule A1,1

merci

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Dim toto
toto = AppExcel.Workbooks.Sheets("Feuil1").Range("A1")
j'ai essyer ceci mais lj'ai un mess d'erreur sur ce code

"variable d'objet non definie"

merci