Discussion :

[Lyysis]

Bonjour à tous,

voilà j'essaie d'ajouter du code VBA à une macro et pour celà je teste avec un code assez simple:

Code :

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

1
2
3
Private Sub AfficherMessage(ByVal strMessage As String)
  MsgBox strMessage, vbInformation
End Sub

Lorsque j'essaie d'éxécuter ce code dans ma Macro j'ai une erreur
"L'expression entrée comporte un nom de fonction que Microsoft Office Access ne peut pas trouver"
puis une fenêtre d'arreur s'affiche et me dit que je ne peux pas faire l'action associée au code VBA
(nom de l'action: ExecuterCode, Arguments: AfficherMessage («ça fonctionne», n° erreur:2950)

J'ai donc assayé d'éxécuter mon code sous MVB et apparemment j'ai une erreur de type ...

Voilà mon problème: je ne comprend pas comment je peux avoir une erreur de type en rentrant un String alors que j'ai précisé qu'il devait se comporter comme un String

[Jean-Philippe André]

Salut,

quand tu entends MVB, c'est quoi exactement stp ?

Compte tenu du numéro d'erreur, il s'agirait d'une histoire de version Access :
http://support.microsoft.com/kb/931407/fr

[Lyysis]

MVB= la fenêtre de code VBA (Microsoft Visual Basic) ^^

J'ai essayé de fermer Access et de le redémarrer mais pas de proposition pour savoir si la base doit être activée ou non ... :s
Par contre j'ai essayé la 2nde méthode de ton lien et ça ne change rien

Je vais rebooter voir si Access me propose d'ativer la base

Par contre tu aurais pas d'idée(s) sur le pourquoi du comment de l'erreur du code VBA?

[Lyysis]

Bon j'ai rebooté et le bandeau "Voulez vous activer la Base?" ne s'affiche pas ... j'ai cherché dans les option mais n'ai pas trouvé comment le faire réapparaître ou choisir l'option via le menu Access si quelqu'un connait un raccourci clavier ou une façon ou une autre d'y accéder ...

Vue que j'ai mis ma base dans un emplacement approuvé elle doit être activée je penses

Mais je vois pas où ça bloque alors ...

[Lyysis]

Cette fois quand j'essaie de double cliquer sur AfficherMessage dans la macro il me snobe carrément

Je voulais essayer de renommer ma fonction mais garder le nom du module pour voir si le fait qu'ils aient le même nom posait pas de problème ...

[Jean-Philippe André]

Une solution assez simple, créer une nouvelle base vierge, et importer tous les éléments depuis ta base "cassée" pour voir si cela viendrait du fichier en lui-même

[Lyysis]

Je vois pas trop comment j'aurais pu "casser" ma base (en même temps je suis pas experte donc ... ^^)
Mais ce qui est bizarre c'est que associer du VBA tout court à une action ça fonctionne mais faire Macro=>VBA ne fonctionne pas ...

logique quand tu nous tiens ...

[Jean-Philippe André]

Vérifie dans tes références, si une n'est pas manquante
http://access.developpez.com/faq/?page=Bug#RefManquant

[Lyysis]

J'ai pas de référence manquante mais je vais faire le contraire (le code vba qui appel la macro)

Code :

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

1
2
3
4
5
 
'Pour ouvrir ma macro
DoCmd.RunMacro "NomMacro" 
'Pour ouvrir un formulaire
DoCmd.OpenForm "NomFormulaire"

qui fonctionne du permier coup et qui est beaucoup plus simple à gérer en fait ...

Merci quand même de ton aide

Ps: j'ajoute le code pour les personnes qui auraient ce problème