Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations dencom on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: emik
  • Content: Threads
  • Order by date
  1. emik

    Run-time error 3052 file sharing lock count exceeded

    Hi guys, This is a strange problem I recently encountered. I found a fix for it on Microsoft's website but I want to understand the problem and how it might potentially affect my program. The error is: "File sharing lock count exceeded. Increase MaxLocksPerFile registry entry." Essentially I...
  2. emik

    How to use a field with spaces in a recordset

    Hi, I currently have a process to import an Excel file using the Transferspreadsheet method. The Excel file has fields with spaces, so the field names in my Access table must match (thus having spaces). In the code for a field without spaces, the recordset is test =...
  3. emik

    Creating a status bar

    Hi guys, I've created a percent counter by using this code in a loop, so with each iteration i and j get increased and a percentage is shown. Dim strFormat as String j = j + 1 Total_progress = j / i strFormat = Format(Total_progress, "0%") txtPercent.value = strFormat...
  4. emik

    How can I get Access to run faster

    Hi, I've never written a program with this many records before and the time it takes to process is through the roof. I have 1 table with 5,000 records and another table with 160,000. What I need to do is loop through the 160,000 and update the 5,000 accordingly. Essentially my code looks...
  5. emik

    Take certain values from report details into report page footer

    Hi, I have a dynamic report report and based on a certain criteria I want to put records into the page footer. For example, if my table looks like this: Item Cost Use ----- comp $1,000 my computer car $2,000 house $3,000 where I live I want the...
  6. emik

    Creating and populating a new Excel file through Access VBA

    Hi, Here is what I'm trying to do. I have 6 queries and I need to output the data to the same Excel sheet with calculations that I will do in Access. So essentially I want to create an Excel file, write my values to it and then save it. I know the starting part would be something like: Dim...
  7. emik

    Rounding to 1 million and formatting it with a comma

    Hello, I posted this message already in the VBA forum, so I apologize to anyone who has to read this twice (I don't see any way of deleting the post). Anyways I'm hoping someone in this forum will be able to help. I need to round a number to the nearest million but show a comma. For...
  8. emik

    Formatting and Rounding

    Hi, I need to round a number to the nearest million but show a comma. $34,450,000.00 should be $34,5 (I'm able to get it to 345) Right now I'm doing Round(number)/1000000 Thanks.
  9. emik

    currentdb.openrecordset not working

    Hi, I have a previous Access application (front end and back end) and all I do to reference a table is: Dim test as recordset Set test = currentdb.openrecordset("Table1") I don't have any other variables pointing to the database. Now I've always done it this way and it's always worked but my...
  10. emik

    Import an Access table from a different Access database

    Here is the ideal scenerio: The user clicks "Import" it opens up the table import window. The user selects "Table1" to import, when they do I want it to overwrite the existing "Table1" (each month this import needs to be done and it will always have the same name). To import I'm using...
  11. emik

    Summing values from sub reports

    I have a query that gets all the data I need. In that 1 query I have values A-Z. I need to break it down so that it shows A-M and then have the N-Z on the bottom (I have certain fields that need to be grouped and sorted, so I can't just sort ascending). So I created 2 queries, 1 for A-M and...
  12. emik

    Rounding to the nearest 1000 in Access query

    I found a post here that asked a similiar question but had no replies. I need to round currency values in my query to the nearest 1000. I have a calculated field and the value is: $10,847.81 so I would like to see a value of $11. So does anyone know how to round to the nearest 1000 ? Thank you.
  13. emik

    Problem running import code

    For this process, my program imports an Excel file into a table. The steps are as follows: -Delete everything from the table -Import the new data. I have all the error trapping but the problem I have is if the user selects the wrong Excel file, the code will delete everthing from the table...
  14. emik

    Creating a 'Save As' dialog to save a query as an Excel file

    Hi guys, this is a tricky one I haven't been able to figure out for some time. Here is the whole process of what I am trying to do: -The user clicks "Export" -The program creates a new folder with a field as the title -The Save As is defaulted to this new folder -The Save As filename is...
  15. emik

    Passing a function as a query parameter

    The main purpose is the prompt the user with an input box, they enter a value and I pass that value to a query parameter. I have done programs in the past that worked, but I had to create 2 functions, the first to accept the value and pass it to the second. The second was then used as the...
  16. emik

    Getting a total record count of a table

    I have a textbox that I want to display the total number of records in a table. I put in this expression: =Count([tableName]![Field]) but I get #ERROR Thanks
  17. emik

    Access compact and repair via VBA

    Hi, I searched the forums and found some threads, but none of them were able to come up with a solution. I wanted to refresh the topic and see if someone has discovered a way. Thanks.
  18. emik

    Easy question about changing default value in text box

    I have a text box with a default value. I want the user to be able to type in a new value and save it as the default value of that text box so that the next time the form is opened it will have the previous path. I have this code: Dim default_path As String default_path = txtDir.Value...
  19. emik

    Access: Export a query as an Excel file with a save dialog

    I'm trying to save a query as an Excel file. I know how to export it but I would like to use a SaveAs dialog box so the user can decide where to save it instead of it being hardcoded. I could put a text field on the form where the write the path, but I'd prefer the save box. Thanks. Right now...
  20. emik

    Excel remove blanks in columns

    Hi, I have an Excel sheet which I use to import into Access. I'm running into a problem because in one of the fields there are spaces. Most of the values are ok, but a few instead of being "123" they would be "12 3" (no idea why). Is there a macro I could write to find the column named...

Part and Inventory Search

Back
Top