Discussion :

[math78]

Bonjour,

J'ai trouvé pour lancer l'accé à la base Access ou est stocké ma macro access.

J'arrive sur le formulaire de saisie des paramètres (date du Jours,date du jours précédent et nbre de jours) j'ai ensuite juste à faire Go pour qu'il execute la Macro Access puis je peux quitter access et reprendre une autre macro sous excel.

Le point délicat c'est de pouvoir reprendre directement au moment du lancement d'Access les paramétres stockés dans une page excel pour qu'il enchaine les deux macros sans avoir à ressaisir les paramètres( dates nbre de jours...) et faire un clic sur GO.

Je suis arrivé à lancer l'ouverture d'access directement d'excel.

Sous access j'arrive sur le formulaire et là je souhaite qu'il reprenne les variables sans avoir à les resaisir.

le code me demande de préciser le nom de la macro pour pouvoir s'executer mais en même tant il a besoins que les variables se préafichent dans le formulaire.

Et là ,ne connaissant pas assez bien access,je suis perdu !
Voici la partie du code ou ça bloque

Code :

Code :

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

1
2
3
4
5
' lancer go
 
DoCmd.RunMacro "ImportStockPassif" 'Ici le nom de la macro Access
 MonAccess.Quit acQuitSaveNone
 Set MonAccess = Nothing

Je pense qu'il attend que je lui indique les variables .
c'est là que je voudrai qu'excel les transmette automatiquement à partir de la feuille Excel où sont présent les variables et la macro VBA d'origine.
Pouvez-vous me donner les indications pour y parvenir?

Merci
A+

[dadavyvy]

Et avec :

Code :

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

MonAccess.DoCmd.RunMacro "ImportStockPassif"

Evidemment DoCmd n'est pas connu par l'application Excel, mais par Access.Application.

[math78]

Oui,mais encore!!

Je fais quoi ensuite ?

merci
a+

[dadavyvy]

En quoi ca bloque? Je croyais que c'etait ton code qui buggait...
Que fait ta macro "ImportStockPassif", je suppose qu'elle importe d'elle meme les données de ta feuille Excel, non?
Quel enchainement attends tu? C'est quoi tes variables? Ca veut dire quoi "se pré-affichent"?
Que fait ton formulaire à l'ouverture? Est-ce un formulaire de mise à jour, directement lié à une table? Est-ce un formulaire lié à une table et qui a un filtre? Est-ce un formulaire tel un Userform à travers lequel l'utilisateur fait des saisies et met ensuite une table à jour?
Je lance les questions un peu en vrac, pour pouvoir mieux t'aider...

[math78]

Bonjour,

En quoi ca bloque? Je croyais que c'etait ton code qui buggait..

le code bloque sur vba à cet endroit car je pense qu'il lui manque un lien dans access.Je ne sais pas vraiment quoi?

Que fait ta macro "ImportStockPassif", je suppose qu'elle importe d'elle meme les données de ta feuille Excel, non?

Ma macro d'access ouvre 2 fichiers sous excel d'imports, lit les données effectue des regroupements et les exportes dans un nouveau fichiers excel.

Quel enchainement attends tu? C'est quoi tes variables? Ca veut dire quoi "se pré-affichent"?

qu'il prennent les dates renseignées dans une page excel que j'ai défini et que j'ai incri comme table dans access.

Que fait ton formulaire à l'ouverture? Est-ce un formulaire de mise à jour, directement lié à une table?

le formulaire attend que je lui indique les fameuses dates qui sont dans la table. Mais je ne sais pas comment les lier à la table.

Est-ce un formulaire lié à une table et qui a un filtre? Est-ce un formulaire tel un Userform à travers lequel l'utilisateur fait des saisies et met ensuite une table à jour?

le formulaire n'est donc pour le moment pas lié à une table , il n'y a pas de filtre.Ce formulaire permet de faire la saisie des dates et c'est là que je cherche à savoir comment les renseigner automatiquement.

Egalement,peut-être que la fonction valeur par défault est interressante pour garder la possibilité d'intervenir pour saisir une date différente que celle indiqué dans la table ?
Merci pour ton aide.
A+

[dadavyvy]

Si je comprends bien, tu as 2 problemes :
- le bug du code
- l'ouverture et l'initialisation d'un formulaire

1/ Pour le bug, je ne vois pas trop pourquoi, car si MonAccess=CreateObject("Access.Application") ou New Access.Application (si tu as déclaré la référence), MonAccess.DoCmd.RunMacro "TaMacro" devrait fonctionner.
As-tu déjà lancé ta macro d'importation sous Access? Est-ce qu'elle plante?

2/ Pour l'ouverture du formulaire, une macro sous Access peut justement le faire, ensuite reste plus qu'à initialiser :

Code :

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

1
2
MonAccess.DoCmd.RunMacro "Ouvrir_Form"
MonAccess.Forms("NomFormulaire").Controls("NomTextBox").Value = "ValeurVoulue"

Ouvrir_Form est juste une macro sous Access ouvrant le bon formulaire.