Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 16/06/2011, 13h40   #1
Futur Membre du Club
 
Jean Pierre
Inscription : mars 2009
Messages : 63
Détails du profil
Informations personnelles :
Nom : Jean Pierre
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : mars 2009
Messages : 63
Points : 19
Points : 19
Par défaut OnAction de commandbar et sandbox

Bonjour,

Je créer une commandbar en VB qui marche parfaitement chez moi, mais pas au bureau. Le bouton concerné doit ouvrir un formulaire :

Code :
1
2
 
.OnAction"=docmd.openform('" & MONFORM & "')"
Lorsque je clique sur le bouton qui a cette action, j'ai un message mode sandbox qui ne considère pas fiable la référence à Docmd.

Dans l'aide, il s'agit en fait d'une valeur à mettre à jour dans la base de registre, ce que je n'ai pas le droit de modifier au bureau (pour des raisons évidentes de sécurité ).

Procédure pour changer regedit :
\Software\Microsoft\Office\12.0\Access Connectivity Engine\Engines
SandboxMode
Édition de la valeur DWORD
Données de la valeur = 3 à changer en 2


Selon vous existe-t-il un autre moyen de paramétrer cette action pour qu'elle ouvre MONFORM.

Merci beaucoup pour votre aide.


JPG
jpg75014 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/06/2011, 13h44   #2
Futur Membre du Club
 
Jean Pierre
Inscription : mars 2009
Messages : 63
Détails du profil
Informations personnelles :
Nom : Jean Pierre
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : mars 2009
Messages : 63
Points : 19
Points : 19
En outre le docmd.openform marche parfaitement dans d'autres situations.
jpg75014 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/06/2011, 14h48   #3
Futur Membre du Club
 
Jean Pierre
Inscription : mars 2009
Messages : 63
Détails du profil
Informations personnelles :
Nom : Jean Pierre
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : mars 2009
Messages : 63
Points : 19
Points : 19
En fait le réel code était :

Code :
1
2
.onAction = "=docmd.openform('" & rs!NOM_FORM & "')"
' avec rs étant le recordset où je vais chercher le nom du formulaire qui y est stocké
Afin de ne pas utiliser le docmd j'ai changé le code :
Code :
 .OnAction = "=CBBouton_OPENFORM('" & rs!NOM_FORM & "')"
et recréé une nouvelle fonction :

Code :
1
2
3
4
5
Function CBBouton_OPENFORM(monform As String)
' fonction nécessaire pour ne pas utiliser le docmd (mode sandbox)--> fonction liée à ADDBAR()
DoCmd.OpenForm monform
 
End Function
Là le docmd fonctionne très bien. Je considère ce post comme résolu et pour ne pas avoir l'impression d'avoir monologué, j'espère que cette solution servira à l'un d'entre vous.

JPG
(et puis si vous aviez des solutions de contournement c'est bien volontiers)
jpg75014 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 19h09.


 
 
 
 
Partenaires

Hébergement Web