Search results

If you'd like customer details at the top and a list of ALL of their transactions etc. at the bottom you may want to look into reports, I'm pretty sure with mail merging you'd have to create a seperate letter for each transaction.

Yeah, I've really got to get into access and learn not to make mistakes like these.

Yay fixed it! Thanks for the help Ken, if anyone else is interested the correct code was Private Sub Label33_Click() On Error GoTo err_trap Me.FilterOn = True Dim MyFilterString As String Combo27.SetFocus MyFilterString = "[" & Combo25.Value & "] = '" & CStr(Combo27.Text) & "'" Me.Filter =...

Private Sub Label33_Click() On Error goto err_trap Me.FilterOn = True Dim MyFilterString As String Combo27.SetFocus MyFilterString = Combo25.Value & " = '" & CStr(Combo27.Text) & "'" Me.Filter = MyFilterString err_trap: debug.print err.description End Sub After adding the error trapping, I was...

debug.print Me.Filter = "'" & me!Combo25.Value & " = '" & CStr(Combo27.Text) & "''" returns False

Nope, only works if I hard code the values as you suggested, trying to grab them from the combobox doesn't work if it's a number :confused: .

Yup :o, Surpised I forgot to try that in the first place :$.

mmmm, this has stumped me =/

Mmmm, that one lost me the little functuallity I had to begin with :P, what characters do you wrap numbers with? I know you wrap strings with ' '.

Shell("PATH TO WORD EXECUTABLE")

When I try applying the filter using mine or your code, it takes absolutely no effect :S

Debug.print returns Part No = '001' to the immediate window, I just don't see what's wrong with it :S Size = '12.7/22.0/M6' Works just fine

Private Sub Label33_Click() On Error Resume Next Me.FilterOn = True Combo27.SetFocus Me.Filter = Combo25.Value & " = '" & CStr(Combo27.Text) & "'" 'Combo25.Value would be "Part No" 'Combo27.Value would be "001" End Sub Doesn't seem to work :S

Hi there, on my form I'm using a drop down filter kind of thing, where you choose a field, then in the next combo box you choose a value, click filter and it then filters it all for you, the problem is, I have different data types, where as "Name = '" & combo21 & "'" 'Combo 21 will return a...

Try changing the textbox's name to something else which isn't being used by any tables/queries etc. such as TextBox12, then change the code accordingly If Me.textbox12 & "" = "" Then Me.textbox12 = "0" End if

Good to see we're happy :)

Hey it was a joke, just didn't see the point in letting the user say c is x then saying a = b then c = a whilst you could have just said c = b, no offence intended.

Ignore me if I've become confused (been trying to read as much access stuff as possible in the past few days, so then again, you probably are right what with me having less than a week's experience :P) but I swear I read somewhere that in access a null field couldn't be compared to "" but only...

Dunno if this'll work in VBA, would work in normal VB though so give it a go, Private Sub Report_NoData(Cancel As Integer) MsgBox "No data to Display" unload me End Sub

Are the text and combo boxes bound to any tables/queries? If so, clearing the forms would also clear those entries in the table/query, if not, you could either set the default value in the properties to "" or use VBA, if you use vba just put this code in the OnLoad event changing it for each...