That worked great. But is it possible to do the same thing for the second combo?
OK, I have two combos, the first one is called cmbCurrentECabinets and all its properties are discussed in the first message. Now I have a second combox that is filtered based on the cmbCurrentECabinet called cmbCurrentEFolder. Its properties are as follows:
Column Count: 2
Column Width: 0;1
Row source: SELECT ECabinets.ECabinetID, ECabinets.ECabinetName FROM ECabinets WHERE ((([EFolders].[ECabinetID])=[Form]![cmbCurrentECabinet]));
Private Sub cmbCurrentEFolder_AfterUpdate()
' Set the Class combo box to be limited by the selected Phylum
Me.cboIndexKey01.RowSource = "SELECT EFolders.EFolderID, EFolders.IndexKey01 FROM EFolders " & _
" WHERE EFolderID = " & Nz(Me.cmbCurrentEFolder) & _
" ORDER BY IndexKey01"
Me.cboIndexKey01 = Null
EnableControls
End Sub
' Set the Class combo box to be limited by the selected Phylum
Me.cboIndexKey01.RowSource = "SELECT EFolders.EFolderID, EFolders.IndexKey01 FROM EFolders " & _
" WHERE EFolderID = " & Nz(Me.cmbCurrentEFolder) & _
" ORDER BY IndexKey01"
Me.cboIndexKey01 = Null
EnableControls
End Sub
I would like the cmbCurrentEfolder defauted to its first related value to cmdCurrentECabinet.
With Warm Regards,
Arthur D. Lorenzini
IT System Manager
Cheyenne River Housing Authority
Wk.(605)964-4265 Ext. 130
Fax (605)964-1070
"Valar Dohaeris"
On Tuesday, November 7, 2017 04:39:31 PM, Duane Hookom duanehookom@hotmail.com [MS_Access_Professionals] <MS_Access_Professionals@yahoogroups.com> wrote:
Art,
Try:
Private Sub Form_Open(Cancel As Integer)
Me.cmbCurrentECabinet = Me.cmbCurrentECabinet.ItemData(0)
End Sub
Regards,
Duane Hookom
From: MS_Access_Professionals@yahoogroups.com <MS_Access_Professionals@yahoogroups.com> on behalf of Art Lorenzini dbalorenzini@yahoo.com [MS_Access_Professionals] <MS_Access_Professionals@yahoogroups.com>
Sent: Tuesday, November 7, 2017 4:15 PM
To: dbalorenzini@yahoo.com [MS_Access_Professionals]
Subject: Re: [MS_AccessPros] Initial Value in Combo Box
Sent: Tuesday, November 7, 2017 4:15 PM
To: dbalorenzini@yahoo.com [MS_Access_Professionals]
Subject: Re: [MS_AccessPros] Initial Value in Combo Box
Any ideas?
With Warm Regards,
Arthur D. Lorenzini
IT System Manager
Cheyenne River Housing Authority
Wk.(605)964-4265 Ext. 130
Fax (605)964-1070
"Valar Dohaeris"
On Tuesday, November 7, 2017 10:30:52 AM, dbalorenzini@yahoo.com [MS_Access_Professionals] <MS_Access_Professionals@yahoogroups.com> wrote:
When I load my frmMain I would like to have the cmbCurrentECabinet combobox control display the first item in the list instead of being empty.
Properties of the combo:
Column Count: 2
column Width: 0;1
Row source: SELECT Archive.ArchiveID, Archive.ArchiveName FROM Archive ORDER BY Archive.ArchiveName;
Any help would be great.
Thank you
Art Lorenzini
SD
__._,_.___
Posted by: Art Lorenzini <dbalorenzini@yahoo.com>
| Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic () |
Have you tried the highest rated email app?
With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.
.
__,_._,___
Tidak ada komentar:
Posting Komentar