Search results

  1. E

    help please...split text into multiple columns

    Can someone help with code to split this text field in my table into multiple columns? I want to do this in my database without having to export to Excel. The word seperator would be a space. Thanks
  2. E

    Help with link code please...

    I have a FE database that on initial setup the user will enter the drive letter of the mapped location where the BE resides. The FE will then update all the linked tables to that path. This should work but for some reason the FE locks up (stops responding) when I test this. Any suggestions as...
  3. E

    Help with CopyFromRecordset

    Sub yourname() Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim dbs As DAO.database Dim rst As DAO.recordset I got this code from a previous post here to be used for transfering data to a cell range in excel. I get a "run-time error 430" Class does not support automation or...
  4. E

    Is this possible

    I would like to create a couple of data entry areas on my form. Each area would have a maximum entry of 30 characters including spaces. I would like to have each character enclosed in its own box. Is there a way of doing this other than creating 30 seperate text boxes for each character and...
  5. E

    Help with module format

    How should this look if placed in a module to be called in several places of my database. Just putting it in as is gives me a compile error. I have defined MyF and Set it depending on which form is running the code, so that is not the problem. Nz(MyF.T1, " ") & Nz(MyF.T2, " ") & Nz(MyF.T3...
  6. E

    Help with SQL

    Is this possible? I have a SQL statement stored in a module that I would like to call as a record source for several forms. I tried this but it didn't work. In the OnOpen event of the form I put the following code: Call PCSub_RS2 'Name of Public Function where SQL statement is...
  7. E

    Clearing Textboxes

    Help - This should be simple I'm using this code to clear unbound text boxes on my form. I keep getting an error message "Object doesn't support this property or method". I'm using this same code on other forms and it works fine. What am I missing? I'm using Access 2000. Dim ctl As Control...
  8. E

    Help with command button

    I have a universal dialog box with a command button that closes the dialog box when clicked. This dialog box is used with several different "master" forms. I would also like to go to a control on the "master" form when the dialog box is closed. Is there a way to assign code to the command...
  9. E

    SQL

    SQL - what's wrong here I have a field (Count) on my form (NN_ON) that displays the number of records returned by the SQL below. The parameter for the SQL comes from a field on my form (NN_ON) called (srID). I get a runtime error 3061 "To few parameters expected 1", if the WHERE clause is...
  10. E

    change property value of fields

    I have 15 text fields on a form that have as default: .visible = false Is there a better way in code to universally change all of these to true other than: [t1].visible = true [t2].visible = true [t3].visible = true etc....... I only want to change...
  11. E

    help with merge field

    This is a two part question: First I have multiple fields (as many as 20) that I would like to merge into one. Is there a cleaner way to do this in code or a query other than =[f1] & [f2] & [f3] ............? Second If any of these fields are blank I want them to represent a space in the...
  12. E

    record

    I have a code that looks for missing numbers and puts them in a table via a make table query. I have thousands of records and the missing numbers records can get very large. How can I modify this code to stop once it finds the first missing number and make the table? Dim dbs As Database Dim...
  13. E

    Update Query

    I have a text field in my table called MissingNum with several thousand records. The total number of digits in this field should always be six. The leading zero(s) have been dropped. I would like to run an update query to add these zero(s). I tried: Format([MissingNum]),"000000") in the...
Back
Top Bottom