TheAceMan,
I hope i didn't scrare you off with my last post...I just meant that I had never done those procedures, didn't say that i couldn't do it.... :-(
Tried it several time, different ways, and the code those not break.
Hope to hear from you soon,
Thanks,
Sylvain
Hello,
i am having trouble with pedit. What cause line to not want to join together when using the PEDIT command?
I have a bunch lines that i want to join together to create a single polyline, and it's not working. Some of them came together, but the rest won't do it.
Why would this...
thank you for hanging in there,
first off, i would like to let you know that i'm on slipery ground here. I am not that deep in VBA, and these procedures your asking me is a first for me.
So i set the break point (there's a red dot beside the line, and the entire line is highlighted in RED...
VICTORY!!!!
It's working now!!! TheAceMan1 you the MAN!! .
For the sack of conversation here is the code working.
For the OpenAnyForm Module
Option Compare Database
Public Function OpenFormAdd(frmName As String)
Dim frm As Form
DoCmd.OpenForm frmName, , , , acFormAdd...
Hi Ace,
no i hadn't taken out the other two modules, now i did.
Here is the result form the Immediate window:
Call SwitchPrint
"1" "0" "Main Switchboard" "" "Default"
"1" "1" "Jobs/Estimates" "1" "8"
"1" "2" "Schedules" "1" "11"
"1" "3" "Production" "1" "12"...
sorry....here is the code:
new Module named OpenAnyForm:
Option Compare Database
Public Function OpenFormAdd(frmName As String)
Dim frm As Form
DoCmd.OpenForm frmName, , , , acFormAdd
DoEvents
Set frm = Forms(frmName)
If frmName = "frmJobs" Then...
Hi again,
Thanks for your code, but i am having trouble.
1. under the [i] Public Function OpenFormAdd [/] am i supposed to substitute something for the "frmName"?
2. In the Switchboard Manager I have change the 'Command' from 'Run Macro' to 'Open Form in Add Mode', and set the form name to...
it's ok, now it's my turn to take a bit of time to reply, thanks for your interest and your help. It's greatly appriciated.
ok, here we go,
I used the Swithboard Manager to create my 'Startup' form.
So this has many button that open different 'pages' or menus, all from the same SwitchBoard...
ok, trying this out, i am having trouble with it, where do i put the code
Call OpenForm("frmJobs", "Add")
in the swithboard? Do i set it to 'Run Code' and put that in the 'function name'? cause that gives me an error message 'there was an error executing command'...
tried with 'call' and...
sounds really cool, i'll have to play with this and report back....
thanks for the tip...just not sure how Access will know the name of the form that i am trying to open....
Thanks,
Sylvain
Hello,
I am wondering the following question.
In my database i used the 'default' Access switchboard as start-up form. This switchboard has many buttons and menus. 2 of those open the same form in different state.
example: button 1 opens form Jobs in 'Add Mode'
Button 2 opens form...
one more question if i may.
now the list box on this form is based on a SQL statment like this:
SELECT tblPurchaseOrders.PurchaseOrderNumber, tblPurchaseOrders.JobNumber
FROM tblPurchaseOrders
WHERE (((tblPurchaseOrders.JobNumber)=[Forms]![frmJobs]![JobNumber]));
if the Jobs form is not...
thanks for the fast response. But now i get a 'Enter Parameter Value' message and it does not filter. here is the new code:
Private Sub Form_Open(Cancel As Integer)
If IsFormOpen("frmJobs") Then
Me.[txtJobNumber].DefaultValue = "[Forms]![frmJobs]![JobNumber]"
MsgBox "jobs...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.