Search results

How can I show top ten records from 2002 to 2004 along with the percentages of increases or decreases (will connect my query to a report). For example if I run a query for 2002 I will get top ten cities, but I would also like to view 2003 and 2004 at the same time and compare the differences...

If you're going to print it I suggest you make a report from that subtotal query. Be sure to make a sale rep footer. If you wish to print it from a query then you will need to make an additional total (sum)query just to break down the sale rep. Sorry Ken for jumping in I figured I might help...

Jeo, Take a look at the link for dlookup help http://www.mvps.org/access/general/gen0018.htm hth, Michael

sorry take out the not. If IsNull(

If Not IsNull(

echorley, Try using formula below =Switch([Field1] Between 1 And 0.9,"A",[Field1] Between 0.89 And 0.8,"B",[Field1] Between 0.79 And 0.7,"C",[Field1] Between 0.69 and 0.00,"F") Ken, Don't you think switch function would be more appropriate to use for grading system. hth, Michael

Nick, Try something like this Dim strDocName As String Dim strLinkCriteria As String strDocName = "ChildDetails" strLinkCriteria = "[Childs Name] = Forms![Child Details Query]![Childs Name]" DoCmd.OpenReport strDocName, acViewPreview, , strLinkCriteria hth, Michael

Try setting up a User Name parameter. If you're running a report from a query try doing something like this for your UserName Field criteria Like [Reports]![ReportName]![UserNameField] & "*" or Like [Forms]![FormName]![UserNameField] & "*" hth, Michael

Try something like this Like "*" & [forms]![frmEmailListByCompany]![CompanyCombo] & "*" Instead of typing the company word you can type in international or textiles. hth, Michael

Correct me if I'm wrong, but are you trying to retrieve all records that are yes in available field? If so, set your criteria to "yes" on available field, Michael

Paste the code on form before update If IsNull([Field1]) Or IsNull([Field2]) Or IsNull([Field3]) Then Beep MsgBox "Please key a value for each of the required fields.", vbCritical, "Incomplete Data Entry" DoCmd.CancelEvent Exit Sub End If hth, Michael

If you wish to print a current record from a form to a report. Paste this code on a command button (On Click Event). Dim strDocName As String Dim strLinkCriteria As String strDocName = "YourReportName" strLinkCriteria = "[YourFieldName] = Forms![YourFormName]![YourFieldName]" DoCmd.OpenReport...

Rita, I posted some filtered report databases awhile ago. If you search the forum for filtered reports you will find plenty of samples. hth, Michael

I'm not sure what your criteria is. Here is an example let say you want your field2 to be locked only if your field1 is blank. Lock Field2 by going to property and set Enabled = No In the After Update event of the field1: If Not IsNull([Field1]) Then Me.Field2.Enabled=True End If hth, Michael

I'm not sure if you deativate the hyperlink, but ever thought about locking the hyperlink field if it doesn't match your criteria. hth, Michael

I suggest your make a cascading combo box. If you're not sure how to do it search the forum on cascading combobox. hth, Michael

I'm not sure I understand what you're trying to do, but if you wish to open more than 1 form with same record showing. Paste the code below onclick command button. On Error GoTo Err_Handler Dim strFieldName As String Dim strForm As String strForm = "FormYouWishToOpen"...

In design view report go to view and sorting/grouping. Select the field that you wish to group as a header. hth, Michael

Check out the link below - you will find an attachment sample. http://www.access-programmers.co.uk/forums/showthread.php?t=69722&highlight=email+report+outlook hth, Michael

Try pasting this code in command button (on click event) Private Sub Command31_Click() Dim strMsg As String, strTitle As String strMsg = "Do You Want To Save This Record?" strTitle = " Save Record ?" If MsgBox(strMsg, vbQuestion + vbYesNo, strTitle) = vbNo Then Me.Undo End If...