Search results for query: *

I don't see what I'm doing wrong with this update, no error occurs, but no update either. Both rec2 and rec5 are ADO. rec2 comes from Oracle, rec5 from Access. Do While Not rec2.EOF With rec5 .MoveFirst .Find "[po] = " & rec2!PO_NUMBER, , adSearchForward...

By the way I had to change the data type in the module to Double; Single was causing a .03 variation every $150,000 in the totals.

PHV - That works, and makes sense now... took the resume next out and it still works - Hap007 I stuck your code in one of the columns it also does not error, thanks.

The list box is populated by a query. The table the query comes from for column(9) has a data type of Currency, the query for column 9 has no format properties. Not sure where the variant comes into play though. btw... Val stopped working after I did a compact and repair, so I recently went...

dhookom - being single it should, 0 erred out, "0" does not for some reason. Hap007 - conversion function - excellent idea, never thought of that CSng but it gave me the error 13 type mismatch unfortunately, tried the CDbl and CCur as well, no luck Ahhh... just tried Val - that worked...

And yes "On Error Resume Next" works... but I just hate using that. But if that's what I need to do then... so be it.

I use this code to sum up column 9 into a list box whenever its requeried but if there isn't at least a $0.00 in the column it says I have a data type problem. It's hung up on the NULL's. The data type in the table the value is held is set to currency. I've tried NZ, I've tried Format...

PHV - That worked but only after I took out the default value - ty again.

My users have 3 values from a combo box to chose from which is used to isolate the data they need to a listbox. I'd like them to have the ability to retrieve all data if the combo box is blank. How can i accomplish this? I've tried using the 'Switch', 'IIF', and 'NZ' funtions in the crieria...

Well yours worked... as usual. Not sure why, maybe its the page that needs something more - or less as your solution proves.

Oh, I tried a variation of things such as: Child: BALANCE_ID Master: Forms!FRM_MAIN!LST_OPEN_BALANCES.Column(0) or Child: BALANCE_ID Master: Forms!FRM_MAIN!TAB_OPEN_BALANCES!LST_OPEN_BALANCES.Column(0) And I always get the "Enter Paramter Value" window or nothing happens at all.

I'm trying to link a listbox on page index 1 (second tab from left) to a subform on that same page. Seems like it would be easy but it's not taking anything I give it. Subform would keep notes to each record in the listbox I select with the mouse. Tab Control: TAB_CTRL_PAGES Page...

Oh, and I took out that extra recordset in there (rec1), sorry about that.

Thank you PWise, not as easy as before but it works, this exported 631K rows in 15 seconds into Excel 2007 from Access 2003: I had to do the object as CreateObject("Excel.Application.12"), I had never thought of using a version number in there before. Private Sub cmd_Dish2_Click()...

I hope they come out with a simple service pack or hotfix for it - Most of us use '03 still. I guess Access 2007 didn't even have this functionality until SP2 came out. Rediculous.

The objectieve of course is to export more than 65K lines, preferably 600K.

I find it hard to believe that this doesn't work in A03, is it true a03 will not do a transfer spreadsheet to excel 07? I usally can't find the little secrets around this site so I'm asking here. Option Compare Database Private Sub cmd_XFER_2007_Click() Call XFERExcel2007 End Sub...

I have 3 items I need to consilate, but I can't lose part of the detail. Right now 3 lines look like: INVOICE DESC AMT 123 TAX 5.00 123 FREIGHT 7.00 123 PAPER 9.00 Need it to 1 line and look like: INVOICE DESC AMT...

SELECT GL_DATA.PK, GL_DATA.[Invoice Date] AS INVOICE_DATE, GL_DATA.[Line Number] AS LINE_NUMBER, GL_DATA.GROUP_ID, GL_DATA.[Line Amount] AS LINE_AMOUNT FROM GL_DATA ORDER BY GL_DATA.PK;

Well done MajP... I still don't understand how it works yet - its coming slowly, but after I put in an autonumber pk it worked perfectly. Private Sub CMD_GROUP_Click() Dim rs As DAO.Recordset Dim con1 As DAO.Database Dim tempDate As Date Dim tempLineNumber As Integer Dim groupID As...