So I had a question come my way regarding some form operations. It will probably help someone else, so I am going to let you know how I did it.
Basically it had to do with setting 2 other form controls based on the first.
Here is a picture:
The table data is a simple 3 column table:
Here is the simple code I used on the “AfterUpdate” event of the combo box:
Private Sub cboAgencyID_AfterUpdate()
Dim intAgency As Integer
Me.txtProviders = DLookup("Provider", "tblAgencies", "AgencyID='" & Me.cboAgencyID & "'")
'LOOKUP THE VALUE FOR THE OPTION FRAME GROUP
Select Case Me.cboAgencyID.Column(1)
Case "College"
intAgency = 1
Case "District"
intAgency = 2
Case "CTSO"
intAgency = 3
Case "CBO"
intAgency = 4
Case "Leadership"
intAgency = 5
Case "Public"
intAgency = 6
Case Else
intAgency = 0
End Select
Me.fraAgencies.Value = intAgency
End Sub
I am setting the value of the Provider textbox by using the DLookup function. Reason? It was easy to use:
Me.txtProviders = DLookup("Provider", "tblAgencies", "AgencyID='" & Me.cboAgencyID & "'")
So based on whatever agency is selected, lookup in the “tblAgencies” table the value in the “Provider” column.
Then I am using the value in the “AgencyType” field to select the integer value of the AgencyType I want to select in my option frame.
That’s all. Let me know if you have any questions.
How to Delete Blank Rows in Excel Using VBA (Step-by-Step Guide)
How to Delete Blank Rows in Excel Using VBA (Step-by-Step Guide) When you work with large datasets in Excel, it’s common to end up with thousands of blank rows scattered throughout your worksheet. Maybe your data came from a mainframe export, a CSV download, or a legacy system that doesn’t format properly. Deleting all those […]
How to Copy Data from One Worksheet to Another Using VBA in Excel
Learn how to copy data between worksheets in Excel using VBA step-by-step! This quick tutorial shows how to automate data movement, save time, and boost productivity. Watch: How to Copy Data from One Worksheet to Another Using VBA Why Automate Copying Data Between Worksheets? Copying and pasting data manually can take up valuable time and […]
Learn Access VBA: Understand Tables, Queries, Forms, and Reports
Learn Access VBA: From Zero to Database Hero If you’ve ever opened Microsoft Access and wondered how all the pieces fit together — tables, queries, forms, and reports — this tutorial is made for you. In just a few minutes, you’ll understand how Access works behind the scenes and see how VBA (Visual Basic for […]
How to Fix Run Time Error 1004 in Excel
If you work with Microsoft Excel frequently, chances ar ling for a solution. Fortunately, this error is well-documented, and there are several ways to resolve it. In this article, we’ll explore the causes of run time error 1004, practical steps to fix it, and preventive measures to reduce the chances of it happening again. What […]
Support these sponsors: