Salut ta premiére version de code fonctionne La faute est mienne je n'avais pas cocher la case "Ne plus afficher" sur le Userform d' acceuil de "Comptoir.mdb" Maintenant tout roule Merci pour tes lumières A+ Guieu
-----Message d'origine----- Bonsoir ,
A ) pour ouvrir directement la base de donnée sans devoir appuyer sur le bouton Ok,
Ajoute cette ligne de code : SendKeys "%o"
L'exemple du code complet deviendrait : '------------------------- Sub OuvrirAccess()
Dim xlApp As Object ' Déclare la variable devant ' contenir la référence. Dim Fichier As String Fichier = "C:Mes documentsComptoir.mdb"
SendKeys "%o" Set xlApp = GetObject(Fichier, "access.application") xlApp.DoCmd.OpenForm "Clients" 'ouvre le formulaire désiré
xlApp.Visible = True Set xlApp = Nothing
End Sub '-------------------------
Pour faire afficher seulement le formulaire issu d'access sans la base de données, je ne crois pas que
cela soit possible.
Cependant, tu peux te créer un formulaire à partir d'un "userform" d'excel et y inclure tous les champs de
ta table. Tu
ajoutes au formulaire des boutons de commande pour les actions que tu désires.
Le principe pourrait être similaire avec une base de données access.
Salutations!
a écrit dans le message de news:01f001c3dd5a$6aebcfa0$
Bonsoir michdenis
"userform d'access qui s' affiche avec une croix rouge" le "userform" qui apparait à l'ouverture d'Access avec un
bruit "d'alerte" est de forme rectangulaire , comporte à gauche une croix blanche dans un cercle rouge, à pour titre "Microsoft Visual Basic",un bouton "OK" à gauche et un "AIDE" à droite; Tout est "figé" Excel comme Access tant que je n'est pas appuyé sur "OK"
Que désires-tu ? Que le formulaire s'ouvre sans l'application Access ?
Oui,où pour le moins que ACCESS soit caché.
Que le formulaire soit un formulaire issu de l'application Excel ?
Que ce soit le formulaire issu d'access, qui vienne sur ma feuille Excel.
Si tu spécifiais tes demandes .... personnellement je ne comprends pas ce que tu désires.
Pardonne mon imprécision dans mes demandes, ce qui me parait clair ne l'est que pour moi. [ Ne passe pour sot, que le sot qui ne tire aucune leçon des erreur qu'il commet...] Merci de l'attention que tu voudra bien porté au probléme que je soumet.
-----Message d'origine-----
Bonsoir Guieu,
"userform d'access qui s' affiche avec une croix rouge"
Tu peux m'expliquer ce que la phrase précédente signifie ?
"est-il possible qu'il s'ouvre dans ma page excel?"
Que désires-tu ? Que le formulaire s'ouvre sans l'application Access ?
Que le formulaire soit un formulaire issu de l'application Excel ?
Si tu spécifiais tes demandes .... personnellement je ne comprends pas ce que tu désires.
Salutations!
"Guieu" a écrit dans le message de news:013501c3dd43$313e2710
$
Merci "michdenis" Ta macro m'ouvre bien le module désiré, mais j'ai un userform d'access qui s' affiche avec une croix rouge. Et sans vouloir jouer les insatisfaits: est-il possible qu'il s'ouvre dans ma page excel? Merci
-----Message d'origine----- Bonjour Guieu,
Si tu désires ouvrir un formulaire à partir d'une macro située dans un module de ton classeur, voilà à quoi
pourrait
ressembler la macro :
'------------------------------- Sub OuvrirAccess()
Dim xlApp As Object ' Déclare la variable devant ' contenir la référence. Dim Fichier As String 'Chemin + Base de données où est le formulaire Fichier = "C:Mes documentsComptoir.mdb"
Set xlApp = GetObject(Fichier, "access.application")
'Dans l'exemple : "Clients" est le nom du formulaire à ouvrir
xlApp.DoCmd.OpenForm "Clients" 'ouvre le formulaire désiré
xlApp.Visible = True Set xlApp = Nothing
End Sub '-------------------------------
Salutations!
"Guieu" a écrit dans le message de news:001a01c3dd0e$b4a99880
$
Salut à tous Quelqu'un sait-il comment integer un module access dans une feuille excel ? Merci
.
.
.
Salut ta premiére version de code fonctionne
La faute est mienne je n'avais pas cocher la case "Ne
plus afficher" sur le Userform d' acceuil
de "Comptoir.mdb"
Maintenant tout roule
Merci pour tes lumières
A+
Guieu
-----Message d'origine-----
Bonsoir ,
A ) pour ouvrir directement la base de donnée sans
devoir appuyer sur le bouton Ok,
Ajoute cette ligne de code : SendKeys "%o"
L'exemple du code complet deviendrait :
'-------------------------
Sub OuvrirAccess()
Dim xlApp As Object ' Déclare la variable devant
' contenir la référence.
Dim Fichier As String
Fichier = "C:Mes documentsComptoir.mdb"
SendKeys "%o"
Set xlApp = GetObject(Fichier, "access.application")
xlApp.DoCmd.OpenForm "Clients" 'ouvre le formulaire
désiré
xlApp.Visible = True
Set xlApp = Nothing
End Sub
'-------------------------
Pour faire afficher seulement le formulaire issu
d'access sans la base de données, je ne crois pas que
cela soit possible.
Cependant, tu peux te créer un formulaire à partir
d'un "userform" d'excel et y inclure tous les champs de
ta table. Tu
ajoutes au formulaire des boutons de commande pour les
actions que tu désires.
Le principe pourrait être similaire avec une base de
données access.
Salutations!
<anonymous@discussions.microsoft.com> a écrit dans le
message de news:01f001c3dd5a$6aebcfa0$a401280a@phx.gbl...
Bonsoir michdenis
"userform d'access qui s' affiche avec une croix rouge"
le "userform" qui apparait à l'ouverture d'Access avec un
bruit "d'alerte" est de forme rectangulaire , comporte à
gauche une croix blanche dans un cercle rouge, à pour
titre "Microsoft Visual Basic",un bouton "OK" à gauche et
un "AIDE" à droite; Tout est "figé" Excel comme Access
tant que je n'est pas appuyé sur "OK"
Que désires-tu ? Que le formulaire s'ouvre sans
l'application Access ?
Oui,où pour le moins que ACCESS soit caché.
Que le formulaire soit un formulaire issu de
l'application Excel ?
Que ce soit le formulaire issu d'access, qui vienne sur
ma feuille Excel.
Si tu spécifiais tes demandes .... personnellement je ne
comprends pas ce que tu désires.
Pardonne mon imprécision dans mes demandes, ce qui me
parait clair ne l'est que pour moi.
[ Ne passe pour sot, que le sot qui ne tire aucune leçon
des erreur qu'il commet...]
Merci de l'attention que tu voudra bien porté au probléme
que je soumet.
-----Message d'origine-----
Bonsoir Guieu,
"userform d'access qui s' affiche avec une croix rouge"
Tu peux m'expliquer ce que la phrase précédente
signifie ?
"est-il possible qu'il s'ouvre dans ma page excel?"
Que désires-tu ? Que le formulaire s'ouvre sans
l'application Access ?
Que le formulaire soit un formulaire issu de
l'application Excel ?
Si tu spécifiais tes demandes .... personnellement je ne
comprends pas ce que tu désires.
Salutations!
"Guieu" <anonymous@discussions.microsoft.com> a écrit
dans le message de news:013501c3dd43$313e2710
$a401280a@phx.gbl...
Merci "michdenis"
Ta macro m'ouvre bien le module désiré, mais j'ai un
userform d'access qui s' affiche avec une croix rouge.
Et sans vouloir jouer les insatisfaits: est-il possible
qu'il s'ouvre dans ma page excel?
Merci
-----Message d'origine-----
Bonjour Guieu,
Si tu désires ouvrir un formulaire à partir d'une macro
située dans un module de ton classeur, voilà à quoi
pourrait
ressembler la macro :
'-------------------------------
Sub OuvrirAccess()
Dim xlApp As Object ' Déclare la variable devant
' contenir la référence.
Dim Fichier As String
'Chemin + Base de données où est le formulaire
Fichier = "C:Mes documentsComptoir.mdb"
Set xlApp = GetObject(Fichier, "access.application")
'Dans l'exemple : "Clients" est le nom du formulaire à
ouvrir
xlApp.DoCmd.OpenForm "Clients" 'ouvre le formulaire
désiré
xlApp.Visible = True
Set xlApp = Nothing
End Sub
'-------------------------------
Salutations!
"Guieu" <anonymous@discussions.microsoft.com> a écrit
dans le message de news:001a01c3dd0e$b4a99880
$a101280a@phx.gbl...
Salut à tous
Quelqu'un sait-il comment integer un module access dans
une feuille excel ?
Merci
Salut ta premiére version de code fonctionne La faute est mienne je n'avais pas cocher la case "Ne plus afficher" sur le Userform d' acceuil de "Comptoir.mdb" Maintenant tout roule Merci pour tes lumières A+ Guieu
-----Message d'origine----- Bonsoir ,
A ) pour ouvrir directement la base de donnée sans devoir appuyer sur le bouton Ok,
Ajoute cette ligne de code : SendKeys "%o"
L'exemple du code complet deviendrait : '------------------------- Sub OuvrirAccess()
Dim xlApp As Object ' Déclare la variable devant ' contenir la référence. Dim Fichier As String Fichier = "C:Mes documentsComptoir.mdb"
SendKeys "%o" Set xlApp = GetObject(Fichier, "access.application") xlApp.DoCmd.OpenForm "Clients" 'ouvre le formulaire désiré
xlApp.Visible = True Set xlApp = Nothing
End Sub '-------------------------
Pour faire afficher seulement le formulaire issu d'access sans la base de données, je ne crois pas que
cela soit possible.
Cependant, tu peux te créer un formulaire à partir d'un "userform" d'excel et y inclure tous les champs de
ta table. Tu
ajoutes au formulaire des boutons de commande pour les actions que tu désires.
Le principe pourrait être similaire avec une base de données access.
Salutations!
a écrit dans le message de news:01f001c3dd5a$6aebcfa0$
Bonsoir michdenis
"userform d'access qui s' affiche avec une croix rouge" le "userform" qui apparait à l'ouverture d'Access avec un
bruit "d'alerte" est de forme rectangulaire , comporte à gauche une croix blanche dans un cercle rouge, à pour titre "Microsoft Visual Basic",un bouton "OK" à gauche et un "AIDE" à droite; Tout est "figé" Excel comme Access tant que je n'est pas appuyé sur "OK"
Que désires-tu ? Que le formulaire s'ouvre sans l'application Access ?
Oui,où pour le moins que ACCESS soit caché.
Que le formulaire soit un formulaire issu de l'application Excel ?
Que ce soit le formulaire issu d'access, qui vienne sur ma feuille Excel.
Si tu spécifiais tes demandes .... personnellement je ne comprends pas ce que tu désires.
Pardonne mon imprécision dans mes demandes, ce qui me parait clair ne l'est que pour moi. [ Ne passe pour sot, que le sot qui ne tire aucune leçon des erreur qu'il commet...] Merci de l'attention que tu voudra bien porté au probléme que je soumet.
-----Message d'origine-----
Bonsoir Guieu,
"userform d'access qui s' affiche avec une croix rouge"
Tu peux m'expliquer ce que la phrase précédente signifie ?
"est-il possible qu'il s'ouvre dans ma page excel?"
Que désires-tu ? Que le formulaire s'ouvre sans l'application Access ?
Que le formulaire soit un formulaire issu de l'application Excel ?
Si tu spécifiais tes demandes .... personnellement je ne comprends pas ce que tu désires.
Salutations!
"Guieu" a écrit dans le message de news:013501c3dd43$313e2710
$
Merci "michdenis" Ta macro m'ouvre bien le module désiré, mais j'ai un userform d'access qui s' affiche avec une croix rouge. Et sans vouloir jouer les insatisfaits: est-il possible qu'il s'ouvre dans ma page excel? Merci
-----Message d'origine----- Bonjour Guieu,
Si tu désires ouvrir un formulaire à partir d'une macro située dans un module de ton classeur, voilà à quoi
pourrait
ressembler la macro :
'------------------------------- Sub OuvrirAccess()
Dim xlApp As Object ' Déclare la variable devant ' contenir la référence. Dim Fichier As String 'Chemin + Base de données où est le formulaire Fichier = "C:Mes documentsComptoir.mdb"
Set xlApp = GetObject(Fichier, "access.application")
'Dans l'exemple : "Clients" est le nom du formulaire à ouvrir
xlApp.DoCmd.OpenForm "Clients" 'ouvre le formulaire désiré
xlApp.Visible = True Set xlApp = Nothing
End Sub '-------------------------------
Salutations!
"Guieu" a écrit dans le message de news:001a01c3dd0e$b4a99880
$
Salut à tous Quelqu'un sait-il comment integer un module access dans une feuille excel ? Merci
