Cellule ecell access

fab101 Messages postés 140 Statut Membre -  
fab101 Messages postés 140 Statut Membre -
Bonjour
sous access en vb
Savez vous comment recuperer la valeur d'une cellule excel pour la mettre dans une table access

j'utilise excel 2000 et access 2000

merci pour vos reponses

3 réponses

random
 
sous visual basic fais outil reference
et mets une croix en face de microsoft excel
insere un module
copie cette fonction

Function excelimport(classeur, feuille, cellule) As Variant
Dim x As Object
Set x = New Excel.Application

Workbooks.Open Filename:=classeur
Sheets(feuille).Select
Range(cellule).Select
excelimport = selection.Value

Set x = Nothing
End Function

que tu invoqueras comme suit
excelimport("c:\machin\exdata\fichier.xls", "feuille", "A1")
attention si tu dois l'utilser souvent ca va ramer
0
fab101 Messages postés 140 Statut Membre 2
 
merci pour ta reponse

mais donc il n'y pas besoin de declarer la base access ni la table
avec le champs ou va la cellule
0
random
 
si tu utilises la fonction dans l'interface base de données par exemple dans une requête mise à jour tu utilises la fonction sans rien d'autre

si tu veux l'utiliser dans un programme access il te faudra l'invoquer dans un sub ou tu feras appel à la fonction
0
fab101 Messages postés 140 Statut Membre 2
 
ok merci pour ta reponse
0