That worked!
Thanks so much, but I don't understand. I've written the code as displayed many times in the past without any problems.
This time I'm dialed into a customer and suddenly I need the "DAO"
Thanks for you quick response.
Hi -
I've used this code hundreds of time w/o a problem, but today is a new day. I keep getting a Type Mismatch error when I run:
Dim CurDb As Database
Dim rTmpNotes As Recordset
Dim sSQL As String
Set CurDb = DBEngine.Workspaces(0).Databases(0)
'open Temp Ship notes table
sSQL = "SELECT *...
Hi All,
I have a simple macro that works great when run from the View Ribbon - Macros window. It basically enters the file path & date into the document.
But if I try to run it from the Quick Access Toolbar, I get an error with only an OK & Help buttons. (Help takes you no where)
Any...
Hi All,
I'd like to take the data from a query and list it with commas in a report text box.
Query data
Record # Value
1 A
2 B
3 C
4 A
5 B
I'd like to display the results as "A, B, C, A, B"
I know there will never be more that 7...
Lets say your Main form is called "Mainform" and it has two fields: Area and Perimeter.
Then your subform contains two fields
Combo123, AorP
You might want to try something like this in the OnChange of the Combo123
IIF(me!Combo123 = "Area", Me!AorP = Forms!Mainform!Area...
Hi All,
I am having a "timing" issue. I have an Add button that opens a form in Add mode. The Invoice header info on top is linked by InvoiceId (autonumber)field to an Invoice detail subform on the bottom.
Tables:
InvoiceHeader: InvoiceID, CustId, InvDate...
InvoiceDetail: InvoiceID...
I'm working on a very simple inventory form. A single form 10 fields, no sub-forms or tabs. I have some code set up that when the user moves between records on the form, it performs some data validation. It checks if the inventory item is found on an Order. If it is, I want to "Lock" certain...
Hi All,
I'm working on creating a Check and my issue is on the line where it writes out "Twenty-five dollars" or whatever the amount is. I have the written words, but I need to add the "*****" to fill up the blank space.
I'm missing the function that fills in the "****" for a select number of...
On the OnOpen of the Login form I call the Module...
DoCmd.OpenModule "GlobalVar"
The only thing in the module is:
Option Compare Database
Public StrRights as String
Public pTerminal as string
Then the User enters in the User name/password press OK button. The VB window opens before the...
I'm still having the same problem, but here are some things I tried...
I created the mde, but get an error when it tries to define the Public variables in the module.
I tried moving the Public statements into a function of the module - error there too. You can't define a Public variable within...
I set a "login" form and when they press the OK button it calles a module "GlobalVar" which has:
Option COmpare Database
Public StrRights as String
Public pTerminal as string
and that's it.
My project has a primary form that is launched at startup of the MS Access 2000 application. On this initial form, I define some Global variables. When that happens the Visual Basic window opens exposing all the underlying code to the end user. Is there a way to hide this?
Thanks!
How do you write a SELECT statment when the WHERE has a wildcard in VBA?
Example:
INSERT INTO SFilterTable (ID, Field1, Field2)
SELECT Sale.ID, Sale.Field1, Sale.Field2
FROM Sale
Where Sale.Field1 = 11163*
Essentially what I have a a Find Form where the user can choose to include or exclude...
Hi All -
Thanks for your help.
Here is the code that finally worked. (I had the subform name wrong)
Dim nid As String
nid = Me.SID
If Me.TabCtl0.Value = 0 Then
Me.SALENTRY1.SetFocus
Me.SALENTRY1.Form.Recordset.FindFirst "SalentryID =" & nid
End If
If Me.TabCtl0.Value = 1 Then...
No matter what I can't get past the error - Method or data member not found.
I tried:
Me.SALENTRY1.SetFocus
Me.SALENTRY1.Recordset.FindFirst "SalentryID =" & nid
Me.Page2.SetFocus
Me.Page2.Recordset.FindFirst "SalentryID = " & nid
Me.Page3.SetFocus
Me.Page3.Recordset.FindFirst "SalentryID = "...
I tried this:
Me.SALENTRY1.RecordsetClone.FindFirst "SalentryID =" & me.sid
Me.Page2.RecordsetClone.FindFirst "SalentryID = " & me.sid
Me.Page3.RecordsetClone.FindFirst "SalentryID = " & me.sid
but get an error - Method or data member not found. I also get this error as a "Recordset
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.