Solved

Assigning a module to a menu button (onclick event)

Posted on 2011-02-17
16
998 Views
Last Modified: 2012-05-11
I want to assign a VB module to a menu button and have the code executed upon the OnClick event; however, I'm not finding the method to accomplish this via the OnClick options.  My research indicates that this call to the module must be made through an establshed function...? Seems straight forward enough but my feeble attempts to make this work have failed.  Any assistance is appreciated.
0
Comment
Question by:Gruffman
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 6
  • 5
  • 4
  • +1
16 Comments
 
LVL 28

Expert Comment

by:omgang
ID: 34921822
You don't actually call a module.  You can call a function.  The trick is you can create a function whose purpose is to call a sub.

Private Function CallSub()

    Call MySubProcedure

End Function


Now you set the OnClick event to the function CallSub, e.g. =CallSub()

OM Gang
0
 
LVL 85
ID: 34921935
What do you mean by "menu item"? Are you referencing a ribbon item? Or are you using the term for something else?
0
 
LVL 75
ID: 34921945
"My research indicates that this call to the module must be made through an establshed function."

Not the case.

Say this is the Function you want to call, either in a Form Module or VBA Module

Public Function mMyCoolFx()

 ' code does whatever

End Function

On the property sheet of the command button - Event tab ... do this - see image,

mx
Capture1.gif
0
Ransomware-A Revenue Bonanza for Service Providers

Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat.  The purpose of this eBook is to educate the reader about ransomware attacks.

 

Author Comment

by:Gruffman
ID: 34921952
I created the function but when I click on the menu button I get an error message that Access can't find the object "StartPDfEmail" (my function).  I typed the name of this function on the "OnClick" line in properties for this button - is that the correct method?
0
 
LVL 75
ID: 34921970
You need to include the Equals sign ... and no quotes ... see image above

mx
0
 
LVL 28

Expert Comment

by:omgang
ID: 34921978
Where did you create the Function StartPDfEmail?  Did you make it a public function?
OM Gang
0
 

Author Comment

by:Gruffman
ID: 34921986
Okay, did that, but now geting a compile error - "expected variable or procedure, not module"
0
 

Author Comment

by:Gruffman
ID: 34922006
StartPDFEmail is a not a function, it's a Public Sub.
0
 
LVL 75
ID: 34922016
"it's a Public Sub."

It needs to be a Public Function, not Sub

mx
0
 
LVL 75

Accepted Solution

by:
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform) earned 25 total points
ID: 34922022
Everything you need is @ http:#a34921945

mx
0
 

Author Comment

by:Gruffman
ID: 34922134
Thank you.
0
 
LVL 28

Expert Comment

by:omgang
ID: 34923071
My first post shows how to use a function to call a sub.
OM Gang
0
 
LVL 75
ID: 34923106
But why would you want to do that?
I *never* ever use Subs. To me they are totally useless in today's world.

mx
0
 
LVL 28

Assisted Solution

by:omgang
omgang earned 25 total points
ID: 34926271
mx, understood.  I interpreted the original Q as to how to call a Sub Procedure directly from the OnClick action of a command button.  A method to do so is to create a function to call the sub.  Now this should seem silly to just about anyone who goes through the excercise since simply converting the called Sub to a Function (as you suggested) provides solution in fewer lines of code.
OM Gang
0
 

Author Closing Comment

by:Gruffman
ID: 34927058
A function to call a function, interesting.
0
 
LVL 75
ID: 34927767
@omgang:
ok.

mx
0

Featured Post

On Demand Webinar: Networking for the Cloud Era

Ready to improve network connectivity? Watch this webinar to learn how SD-WANs and a one-click instant connect tool can boost provisions, deployment, and management of your cloud connection.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When you see single cell contains number and text, and you have to get any date out of it seems like cracking our heads.
You need to know the location of the Office templates folder, so that when you create new templates, they are saved to that location, and thus are available for selection when creating new documents.  The steps to find the Templates folder path are …
Familiarize people with the process of retrieving data from SQL Server using an Access pass-thru query. Microsoft Access is a very powerful client/server development tool. One of the ways that you can retrieve data from a SQL Server is by using a pa…
Add bar graphs to Access queries using Unicode block characters. Graphs appear on every record in the color you want. Give life to numbers. Hopes this gives you ideas on visualizing your data in new ways ~ Create a calculated field in a query: …

696 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question