Recent content by Climbo

Hello there, I have a sorted DB that contains a phone #, a create Date, a blank Expiry date and an order #: phone# Create_Date Expy Date Order # 1111111111 2009/10/03 QWE23 2222222222 2009/10/05 QWE43 2222222222 2009/10/09...

Hello there, I have the following code in access that imports a .BAS module and does a few things in the excel Form: ... Set objXL = CreateObject("Excel.Application") Set xlWB = objXL.Workbooks.Open(LastFileName) Set xlWS = xlWB.Worksheets("Agent Level Report")...

Hello there, I am trying to run an excel macro through access and always getting a runtime 1004-Macro cannot be found error... anyone can help? here is part of my code: FileDirectory = "J:\RC Tools\Vendor Bins Report" Set objXL = CreateObject("Excel.Application") Set xlWB =...

Thanks for the quick reply, but it seems that the day has been too long :rolleyes:.. there were a few words missing in my question. I already had the function in a public module, and I can get it in my DB. What I truely want :), is to be able to use that Function in any query.. IN ANY DB...

Hello there, I just create a VBA function and I'm wondering if it is possible to add it to Access Expresion builder, so I can call it from any queries...

Hello there, I think what I'm trying to do is fairly simple but would need your help on this. I have put some text in a variable called "ScriptFile" and I want to create a text file with the info stored in that variable. If the Text File already exists, I would need to overwright it...

Hello there, A pause followed by a msg box wouldnt do the trick since I would need to click on OK on that msgbox to continue. the goal of this exercise is to have a popup window that will dissapear in X seconds without having to press on OK... so if I run a loop of 100,000 records that...

Hello there, to my knowledge, the MsgBox function does not have a timer function, that is why I'm using the above code... in this line: oSHL.PopUp "Now running item " & x & " out of 10", 1, "Timed MsgBox ...", vbOKOnly the ,1, represent the number of seconds before the msgbox will...

Hello there, I have a timed msgbox: For x = 1 To 10 Dim oSHL As Object On Error Resume Next Err.Clear Set oSHL = CreateObject("WScript.Shell") If Err <> 0 Then MsgBox "Error:" & Err Else oSHL.PopUp "Now running item " & x & " out of 10", 1, "Timed MsgBox ...", vbOKOnly End If Next x I...

Hello there, I have a table with history codes and dates ex: Name : Code : Effect_Date : Expiry_date John S 6/4/2008 6/23/2008 john A 6/24/2008 dave A 5/6/2008 6/23/2008 dave S 6/24/2008 8/4/2008 dave A...

workin' Thanks guys

Already tried this variant, getting same error :(

Hello there, From Access, I want to open an excel sheet and run a sub (which is activated by a button in excel). The sheet opens without a problem but seems that I'm unable to have the Sub run (Access 11.0 object library checked). I always get "The macro 'UpdateReport_Click' cannot be found...

Hello there, I am trying to get the last row value in a variable but always getting a define-application errror, Please help. Dim objXL As Object Dim xlWB As Object Dim xlWS As Object Dim rst As DAO.Recordset Dim LastRow As Integer Set objXL = CreateObject("Excel.Application") Set xlWB =...

Hello There, In a table I have a create date and a status, where staus can be "assigned" or "Fixed". I want to build an expression in a query that will get the Min([Table]![Create Date]) for all "Assigned" ones. I need to filter the Status in the expression builder since I have more...