Discussion :

[domibigoudi]

Bonjour et meilleurs vœux,

J'aimerais récupérer en VBA Excel le contenu d'une textbox d'un formulaire actif access.

Merci et bonne journée.

[Menhir]

Pour utiliser les objets Acces, il faut charger la bibliothèque de ces objets.
Dans l'éditeur VBA : Menu Outils > Référence > Cocher "Microsoft Acces Object Library"

[domibigoudi]

Merci pour la première partie de réponse.

Quel est maintenant le code VBA pour récupérer la donnée?

Merci.

[Menhir]

Aucune idée, je n'ai jamais manipulé Acces en VBA.

Voici ce que dit l'aide VBA sur la manipulation d'objets inter-application.

Pour exécuter du code dans une application Microsoft Office fonctionnant avec les objets d'une autre application, suivez les étapes décrites ci-dessous.

Dans la boîte de dialogue Références du menu Outils, définissez une référence à la bibliothèque des autres applications. Ceci fait, les objets, propriétés et méthodes s'affichent dans l'Explorateur d'objets. La syntaxe sera vérifiée au moment de la compilation. Vous pouvez également obtenir une aide contextuelle.
Déclarez les variables objet qui feront référence aux objets de l'autre application en tant que types spécifiques. Veillez à qualifier chaque type à l'aide du nom de l'application dont l'objet est issu. Par exemple, l'instruction suivante déclare une variable pointant vers un document Microsoft Word et une autre qui fait référence à un classeur Microsoft Excel :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim appWD As Word.Application, wbXL As Excel.Workbook

Remarque
Suivez les étapes ci-dessus si vous souhaitez que votre code utilise la liaison anticipée.

Utilisez la fonction CreateObject avec les Identificateurs de programmation OLE de l'objet avec lequel vous souhaitez travailler dans l'autre application, comme l'indique l'exemple suivant. Pour voir la session de l'autre application, affectez la valeur True à la propriété Visible.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim appWD As Word.Application
 
Set appWD = CreateObject("Word.Application")
appWd.Visible = True

Appliquez les propriétés et les méthodes à l'objet contenu dans la variable. Par exemple, l'instruction suivante crée un document Word.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim appWD As Word.Application
 
Set appWD = CreateObject("Word.Application")
appWD.Documents.Add

Lorsque vous avez terminé de travailler dans l'autre application, utilisez la méthode Quit pour la fermer, comme indiqué dans l'exemple suivant.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

appWd.Quit

Je suppose qu'en changeant "Word" en "Access", on doit pouvoir manipuler les objets Acces.

Ensuite, si tu veux savoir comment manipuler une textbox Access en VBA, il serait préférable de poser le question dans le forum "VBA Access" . http://www.developpez.net/forums/f65...ss/vba-access/

[domibigoudi]

Bonjour,

Auriez-vous une idée pour connaître le contenu d'un textbox d'un formulaire access ouvert tout en étant dans une feuille excel en VBA.

Le principe est que j'ai créé une query en access (données en fonctions de dates et autres critères), je récupère son contenu en Excel, traite les données mais pour créer le diagramme de gantt, je dois connaître ces dates.

Merci.

[Invité]

Bonjour

Il est rare de faire la transition des données dans ce sens, c'est en général l'inverse, d'Access ou transfert les données sous Excel.

Pourquoi ne pas partir de celle solution Access vers Excel ? C'est plus simple, et le nombre d'exemple est beaucoup plus grand (voir sur le forum VBA Access et dans les différentes FAQ).

Philippe