Search results

  1. fpendino

    How do you loop through a listbox?

    Nirious, I usually use the For, Next. Here's an example of how it can be used. Dim intR as Integer 'lstActiveReports is my ListBox name 'Use this with Column Heads set to NO For intR = 0 To lstActiveReports.ListCount MsgBox lstActiveReports.column(0, intR) 'Use the .column to...
  2. fpendino

    Disable F1 key in report preview

    Is there a way to disable the F1 key in report preview? I was able to set it up for the forms ok, but I can't find anything that tells me if I can or can't do this in the report preview. Thanks in advance.
  3. fpendino

    Importing differently arranged data via common file dialog

    Try doing a search on Common File Dialog. There are tons of posts regarding it. Once figuring that you should be able to select the database of your choice, and you can either create a listbox/combobox to query that databases list of tables using it's MSysObjects(SystemTable - Hidden) table...
  4. fpendino

    Cancel click of X

    Try getting rid of the X all together and putting a Cancel button which will provide you with a little more flexibility.
  5. fpendino

    Getting Rid or Surpressing of a Warning Message

    Use the set warnings to turn the warnings off. Docmd.SetWarnings False docmd.Openquery sql Docmd.SetWarnings True Make sure you turn the warnings back on after you complete your queries.
  6. fpendino

    sortlist project

    I am working on a function that will sort a list box based off of command buttons that will act like headings for the list box. I have ran into some code before, but am unable to find it. I'm just wondering if anyone has anything like this. It would save me a lot of time and headaches. I...
  7. fpendino

    Table manipulation using VBA

    I tend to have this problem with some of the data I import also. I use the Trim() function within a query to help eliminate the coding part of it. I believe Trim only gets rid of the spaces in the front part of the field. To use this properly though, when importing, I have an import table that...
  8. fpendino

    requery

    Try clearing out the other combo boxes before doing anything. Add this in front of the IF statement. ' clear the bottom combo's current value Me.cboSpec2 = Null Me.cboTest = Null If IsNull(Me.cboCustomer2) Then ' lock and disable the bottom combo Me.cboSpec2.Enabled = False...
  9. fpendino

    Function not Available - 3075

    Is the date() that you are referring to a field?? If so try getting rid of the () after date and enclose it in brackets [Date].
  10. fpendino

    Rank values in a text box

    Try adding a rank field to your table and add it to your form, as I am assuming you are using a continous form. Each time one of the spin buttons is pressed, have it pull a recordset off of your table, ordered by the highest score. Then create a loop and an update query in code which updates...
  11. fpendino

    SetFocus??

    After you open the form, you can just relay that data over as follows. Forms!frmSection!EmployeeID = me.EmployeeID Put that directly after you docmd.openform code.
  12. fpendino

    Form accidentally moving to a new record

    Hello. I don't think that the problem is a combination of buttons that are being pushed. If you tab through all of the controls on the form, once you get to the last control and press tab, it will automatically take you to the next record on default. This also happens if you just highlight...
  13. fpendino

    Queries or SQL?

    I usually base my designs on how long the text of the sql is and whether or not need to use any variables. I'm not sure which of the two is quicker, but with my experience, they usually run about the same. I would guess that the sql in code may run a slight quicker, but maybe one of the pros...
  14. fpendino

    Marco/SendObject to Lotus Notes Errors.

    Do a search on the forum for 'Email with Lotus Notes'. There are tons of discussions regarding this. I'll also tell you now that you won't be able to use the send object function, as it doens't associate with Lotus Notes. I believe it only works with MS products. I use Lotus Notes too...
  15. fpendino

    Starting with Access

    A good book that I used to get started was the 'Access 2000 VBA Handbook' by Susann Novalis. I'm sure there are many others out there that of some use, but this one gave me a good idea on how to get started. Try searching on Amazon.com or Barnes and Nobles. You can probably find a used one at...
  16. fpendino

    Form Style

    I'm sorry I didn't clarify. Go to Format on the Toolbar, not the properties menu. You must have the form selected though or else you will only change the format for whatever control, etc., you have selected.
  17. fpendino

    Form Style

    Open the form in design view. Select the Form itself so it is has the properties. Go to Format, and select autoformat. This will adjust some of the controls, but should be an easy fix. Save your form before you do this, just in case you don't like the results.
  18. fpendino

    Strange lock behaviour

    I'm not too sure why you are having that problem, but here may be a solution. This cycles through every control on the form. Dim ctl As Control For Each ctl In Me.Controls If ctl.ControlType = acTextBox Then ctl.enabled = True ctl.locked = False End If Next ctl
  19. fpendino

    Counting A Recordset

    Is it possible to count how many records are selected in an Append Query using a recordset count? Or will I have to make the sql statement into a select query before I am able to use the recordset function? Also, I need to know this exact way because I have other functions bases solely off...
  20. fpendino

    Installable ISAM w/97 & 2000

    I have tried the suggested link and am still having the same problem. When I open Access 2000, the Excel file type is listed, but not in Access 97. Are there any other fixes for this, or is it safe to say that I'll have to get rid of Office 2000 for this to work. Thanks!!
Back
Top Bottom