Mettre à jour un classeur Excel intégré dans un formulaire Access - VB/VBA/VBS - Programmation
Marsh Posté le 15-12-2005 à 23:04:08
Dans access il te faut référencer excel (outil/référence/excel 9.0 ou 10.0 suivant ta version
Ensuite tu déclares deux variables dans un module
style :
Public xlAppList As Excel.Application
Public ThisWorkbook As Excel.Workbook
Tu définis dans ton formulaire access le chemin vers ton fichier excel :
PathExcelFile = App.Path & "\" & NameExcelFile
Tu vas ouvrir ce fichier excel :
Set xlAppList = CreateObject("Excel.Application" ) 'crée une instance excel
Ouvre le classeur avec :
set thisWorkbook=xlAppList.Workbooks.Open PathExcelFile, 0, , , "MotDePasseSiExiste"
tu vas lire la valeur que tu souhaite intégrer dans excel :
ValeurAColler=champX.value
tu fais :
xlAppList.Thisworkbook.sheets("nomdela feuille" ).select
puis
xlAppList.Thisworkbook.activeSheet.range("A1" ).activate (si tu veux mettre la valeur dans la cellule A1
et
Activecell.value=valeurAColler
pense à refermer le classeur en l'enregistrant
désinstancier tes variables
Set xlAppList = nothing
set thisWorkbook=nothing
Il faudra sans doute voir l'action à faire pour que l'objet excel intégré soit mis à jour...cela dépend de la liaison..
Je te mets tout cela de tête...demain au bureau j'ai des codes sur la questions donc si besoin relance...
Marsh Posté le 14-12-2005 à 18:40:58
Bonjour à tous,
) qui me colle le contenu du champ de mon formulaire dans une cellule de ce classeur Excel.

Je précise tout de suite histoire qu'il n'y ait aucun malentendu que je suis une bille en VBA.
Mon pb est le suivant:
J'affiche dans un formulaire Access le résultat d'une requête
Dans ce même formulaire j'ai un classeur excel qui a été intégré en temps qu'objet.
Je souhaite faire une macro (ou autre chose
Ca à l'air tout con mais ça fait 2 jours que je tourne en rond dessus
Merci pour votre aide