Recent content by Rick_A

If you reference the control in a query then you will not be able to do what you are trying to do. You're best bet in this situation would be to create the query dynamically.

If you simply do not include the field in your criteria, you will get all records that have either a 0 or -1.

Try this; Lets say your counter is named "i", then you could refer to your field like so: Me.Controls("period_" & i).Visible = True

Use this: SELECT MSysObjects.Name FROM MsysObjects WHERE (Left$([Name],1)<>'~') AND (MSysObjects.Type)=-32768 ORDER BY MSysObjects.Name;

Set the width property of the combobox so that the column with the id has a width of zero. So the width property of the combo box should look something like: 0";1";1";1"

Try this: IIf(Nz([Allocated],0)+(Nz([Carryover],0))=0 OR (Nz([Approved],0)=0,0),0)

I'm pretty sure you'll also need to call the Nz function like so: Nz([Approved],0)

In your query, create a calculated field with this: Replace([Product_Description],"$Detail",[Product_Solution])

I'm not sure what you're up to with this, but it sounds like you're gonna want some code on the click event of the list box. To get the value that was selected in the list use: lstListBox.ItemData(lstListBox.ListIndex) Assign this to a string and then do a select case, i.e. Select Case...

My first thought was to make sure that a control named "CoName" exists on the form--make sure it's not misspelled or something.

This should work: Private Sub MyZipCode_KeyPress (KeyAscii As Integer) If KeyAscii >= vbKeyA And KeyAscii <= Asc("z") Then KeyAscii = 0 End IfEnd Sub

If I'm understanding you correctly, then this should do the trick. Private Sub clear_Click() Me.contactsubform.Form.FilterOn = False cbocompany = "" cboname = "" cbostate = "" End Sub

Like so: Private Sub cmdApplyFilter_Click() Dim strWHERE As String If Len(Me.cbocompany) > 0 Then strWHERE = " [CompanyID] = " & Me.cbocompany & " OR " End If If Len(Me.cboname) > 0 Then strWHERE = strWHERE & " [NameFull] = '" & Me.cboname & "' OR " End If If...

Use this instead: If Len(Me.cbocompany) > 0 Then strWHERE = " [CompanyID] = " & Me.cbocompany & " Or " End If

It sounds like this is for Excel? Can't you format the cells to display the number the way you want? I've tried this in Access and Excel with no problems.