Recent content by DIVINEDAR0956

I haven't been here in awhile and not sure if this site is still up. But I need help cleaning up the code that I have wrote. I'm trying to do two things for two different files but using the same code sorta. What I need to do is that if I type a file name in a cell then it searches a...

Okay guys, I figured out what my problem was. In the sheet that you are transferring into access from excel, the very first cell in excel has to have a value or text in it. If it doesn't it will not transfer the spreadsheet and that is why I was getting the error. Thank you for your help...

SteveEAA You lost me. I have a script importing the table into access. That's what seem to be my problem is the following: Public Function updatelink() 'EditProjectNumber Dim dbsDocument As Database Dim rstDocument As Recordset Dim sTable As String Dim strFileName As String...

Juan, I am using Access 2002 with Excel 2000. If I can figure out why you will be the first to know. I did try 9 and it didn't work either. I wondering is it the fileformat xlNormal could be the reason. Let me know if you find out anything. Let me know what else you are trying to do...

No that didn't work by letting it default. For the world of me I can't understand why it's not working. I have tried it every way. I have even checked my range names for all documents and they work fine. In the excel document itself once it does a final calculation it automatically saves...

My code breaks on this line "DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, sTable, strFileName, True, "PROJECT_EXTRACT"". I have tried several ways to bring in the excel spreadsheet to access by saving the excel spreadsheets in different versions of excel but...

Question for you. I understand doing a macro to import the tables but the catch to writing the macro is that you have to select the file from a particular folder so you can't write a specific file name. Is there a way for the file name to be a procedure to open the file dialog box to select...

Could someone please help me. I have an excel file that I want to transfer into access. This has worked in the pass and now all of a sudden I am getting this error message EXTERNAL TABLE IS NOT IN THE EXPECTED FORMAT . I can't seem to figure out if there is a library I need to download or my...

I'm sorry John but I just did this as a step by step thing hoping it would work. I did not pull this code from anywhere. Some of it believe or not I just took a chance on. Thank you though. Please give example of short query statement. I'm afraid that's something I've never worked with yet...

I have the following procedure and it gives the error message "OBJECT VARIABLE OR WITH BLOCK VARIABLE NOT SET" Private Sub Command109_Click() On Error GoTo Err_Command109_Click Dim stDocName As String Dim stLinkCriteria As String Dim obCheckProject As Object Dim...

I have an excel spreadsheet that has quite a few worksheets in it (approximately 120) that needs to calculate. Is there anyway to open this spreadsheet any faster? And is there a procedure that makes a calculation run faster? Darlene Sippio dsippio@comtechsystems.com

What it does is Row F15:Q19 are rows that are calculated for each spreadsheet and F23:Q38 are calculated for each spreadsheet. Rows F15:Q19 are calculated to make another worksheet to be transferred into access. This includes all worksheets calculated together to make one worksheet. Rows...

Can someone help me? How can I get my calculations to run faster? I have the following: Sub Finalize() Application.ScreenUpdating = False With Application .Calculation = xlManual .MaxChange = 0.001 End With 'Show certain WorkSheets ShowSheets...

My problem on changing the number of records in a set is that there is a possibility that the table could hold up to 500 records in one set. Is there a variable or something I can set for an unlimited number of records. I changed string to variant. One more question for you. How do you set a...

I have the following function in Access and can't seem to understand why I'm getting an error that I don't understand. The function is as follows: Public Function EditMarkupPercentage() Dim rst As ADODB.Recordset Dim i As Integer Dim strTblName As String Dim strNewFormulaValue...