Search results

  1. Y

    Tricks for a form needed

    Not really sure if this is what you are after but you could trap a keypress for the form F9 or whatever. A key that isn't used in every day life. When the key is pressed make your field visible....Maybe!
  2. Y

    Filter Products With No Price

    If you have set the type s currency, then it may have a default value of 0. therefore you're criteria could be =0. If this is not the case try Is Null or =""
  3. Y

    Use a Cmd button to import Excel spreadsheet?

    Put this in the on click event: DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel97, "MyTable", "c:\MyExcelFileName.xls", True True refers to whether the spreadsheet has field names. The field names need to match the field names in the table. Hope this helps
  4. Y

    ReachEdit

    If you mean a Rich TextBox click 'more controls' on the toolbox, then select Rich text box....
  5. Y

    Bold Combo Boxes

    Thanks for the answer but I need the individual item to be bold, when clicked, and remain bold within the combo box until the item is clicked again. Therefore when the user selects the combo box the second time, whatever item they clicked in the list the first time is still there but...
  6. Y

    Bold Combo Boxes

    Does anyone know if it is possible to make the item(s) clicked in a combo box bold or italic or red or whatever. Then when it is clicked again 'unbold' it.
  7. Y

    zip files

    Try this: ftp://ftp.ruhr-uni-bochum.de/pub/Info-ZIP/info-zip.html
  8. Y

    How to get a Lable to open a Form

    In the On Click event of the label put in: Docmd.openform "MyFormNameInHere" And your form will open.
  9. Y

    Criteria

    Try: Between val([Enter first ID:]) And val([Enter Last ID:]) If it doesn't work, look up 'Between' in the help file. This function will give you a range.
  10. Y

    Find Squence of #s

    I was actually looking for 2 entries the same rather than a sequence but it works in the say way. I accomplished it by looking at the 1st the 2nd & comparing them, 2nd & 3rd and so on. With only 1000 records I think you'll be surprised at it's speed, then again maybe I'm easily pleased!
  11. Y

    Access Reports from VB6

    Dim Axs As Access.Application Set Axs = New Access.Application Axs.OpenCurrentDatabase YourDatabasePath, False Axs.DoCmd.OpenReport "YourReportName" Axs.Quit Set Axs = Nothing
  12. Y

    Criteria

    In your criteria you could put: Between [Enter first ID:] And [Enter Last ID:] This will then give you a range...
  13. Y

    Find Squence of #s

    I have done something similar recently and I think you're going to struggle to do this in a query, although I may be wrong. There were many more than 1000 records in my table and it worked very quickly and was doing a lot more than you seem to require.
  14. Y

    Can a control be displayed based on a selection?

    Private Sub Combo2_Click() If Combo2 = "No" Then Text0.Visible = True Text0.Enabled = True Else Text0.Visible = False Text0.Enabled = False End If End Sub
  15. Y

    Can a control be displayed based on a selection?

    Pre draw the comments box and set it's visible & enabled properties to false. When the use selects no, enable the visible & enabled properties. txtComments.Enabled = True txtComments.Visble = True
  16. Y

    Data Navigation

    Form properties - Data entry is possibly set to True.
  17. Y

    Sum of report in reports

    I'm not sure I fully understand but why not do the sum in a query and use dlookup to show the value in the footer of your first report and also in the detail of the 2nd report.
  18. Y

    Error while trying to save record

    Could be many things. Try entering data directly into your table. Then go to the next record. If that doesn't error then it is something to do with your form...
  19. Y

    Preventing "-" after a number

    One way would be to put this in the kepress event of your text box: If KeyAscii = 45 Then If InStr(1, Text0.Text, Chr(45)) Then KeyAscii = 0 Else KeyAscii = 0 Text0.Text = Mid(Chr(45), 1) & ext0.Text End If End If
  20. Y

    Error while trying to save record

    Before the 'Unable to save'... message, do you not get another error message?
Back
Top Bottom