First, it was set up like this:
1. Main form with button to click to sort.
2. Opens frmSort
3. frmSort has: 1) an unbound combo box with Row Source: CompanyID and CompanyName; 2) Option Group with 2 values: Ascending Descending.
Below is the code:
On Error GoTo ErrorHandler
If...
When I try to sort the CompanyName field, it does nothing. All the other fields will sort like it suppose to.
Also, CompanyName field is a subform on the main form.
Any suggestions on how to get this to work?
Below is my table structure:
tblCompanies
CompanyID dbLong PrimaryKey...
I changed it to:
Dim rs As Object
Dim lngBookmark As Long
If Me.Recordset.RecordCount = 0 Then
Forms!frmViewEventHistoryList.Requery
Exit Sub
Else
' set a variable to the current record
lngBookmark = Forms!frmViewEventHistoryList!txtEventID...
When I am on the first record on the list and I open the form to delete that record, when closing the form I get Error Number: 3159--not a valid bookmark. Below is the code I am using:
Dim bkMark As String
If CurrentProject.AllForms("frmViewEventHistoryList").IsLoaded Then
bkMark =...
The combo box works and I have auto drop down set up. I was asked about using 1, 2, 3 and so on. But, at this point, I don't think it's totally necessary.
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.