Prev: Power Point Viewer 2007 won't open ".pps" files
Next: How to show a Customized Built-In Ribbon Tab When No Form is Active
From: deb on 22 Apr 2010 15:55 Access 2003 form called fGua has an unbound list box called lstComponent. When the user selects from the listbox how can I make the form filter by that selection Private Sub lstComponent_AfterUpdate() Select Case lstComponent.Value Case "CT" 'CT Me.Filter = "[Component] = [lstComponent].value " Me.FilterOn = True Me.Component.DefaultValue = """" & Me.lstComponent.Value & """" Case "ST" 'ST Me.Filter = "[Component] = [lstComponent].value " Me.FilterOn = True Me.Component.DefaultValue = """" & Me.lstComponent.Value & """" End Select -- deb
From: deb on 22 Apr 2010 16:41
figured it out... Me.Filter = "[Component] = " & """" & Me.lstComponent.Value & """" -- deb "deb" wrote: > Access 2003 > > form called fGua has an unbound list box called lstComponent. > > When the user selects from the listbox how can I make the form filter by > that selection > > Private Sub lstComponent_AfterUpdate() > Select Case lstComponent.Value > Case "CT" 'CT > Me.Filter = "[Component] = [lstComponent].value " > Me.FilterOn = True > Me.Component.DefaultValue = """" & Me.lstComponent.Value & """" > Case "ST" 'ST > Me.Filter = "[Component] = [lstComponent].value " > Me.FilterOn = True > Me.Component.DefaultValue = """" & Me.lstComponent.Value & """" > End Select > -- > deb |