Search results for query: *

Hi all, I have the following sub procedure. The combo box is being filtered as I want it filtered and the control source is Desc1 but cboDesc1.value does not write to the table... cboApplication.value does. Any ideas? Please help. Private Sub cboApplication_AfterUpdate() Dim sSQL As String...

Can someone help me by adding looping code for 3 cboDesc boxes, cboDesc1, cboDesc2, cboDesc3 Private Sub cboApplication_AfterUpdate() Dim sSQL As String 'MsgBox "The Code is Executing!" 'clear cboDesc1 Me.cboDesc1 = Null sSQL = "SELECT Desc1 FROM tblApplicationDescription"...

Hi all, I have used this code before in previous databases but am now having issues of cboDesc1 = null and it shouldn't be. My sSQL is correct. The funny thing is when I run this code, the cboDesc1 box becomes dimmed out and unclickable but has no value. I am eventually going to have 3...

I keep getting a compile error on Dim MyDB as Database. I've even tried adding as DAO.Database but that doesn't seem to correct the problem. What am I doing wrong? Private Sub cmdAddNew_Click() Dim MyDB As dao.database, rcsTest As Recordset 'MsgBox "The Code is Executing!" Set MyDB =...

First, I am having a hard time with the syntax for a subform. I can't even get the code to realize I am on a subform. Next, I have a main form frmAddDoc with a field txtTitle and a subform subfrmReference that loads from the main with an on_click event button. I have a field txtTitle in the...

Hi all, we have been upgraded to Access 2007 without our knowledge of it coming and a critical program for us is halted now as a result. Some of the code that it is stopping on is: Dim xlTemplateWorksheet As Excel.Worksheet xlTemplateWorksheet.select I get an Access error box that says...

Hi all, we have been upgraded to Access 2007 without our knowledge of it coming and a critical program for us is halted now as a result. Some of the code that it is stopping on is: XLTemplateWorksheet.select I get an Access error box that says: Automation Error, The server threw an...

Hi everyone!! I have an SQL statement that I didn't write and I barely understand it, but this is what it looks like: strSQL = "Select distinct [Program Code],[E_Name] as Name,count([Project Id]) as NumOfProj from " & strTblName strGroupBy = " GROUP BY [Program Code],[E_Name]" strWhere = "...

Hi all, Just wondering - is it possible to create a new query field based upon data from another field using criteria of +/- ??? Now, I know that this doesn't work but there has to be a way. Example: I have a field of data that is titled "Length" and say the value for that field is 48 on one...

Hi everyone! When I have just two cells listed to .clear, this works. When I add all the cells I need to be cleared, I get the Compile Error "Wrong Number of Arguments or Invalid Property Assignment" Should I be using something else other than Cells??? Please help! Sub RemoveStuff() Dim...

Hi all, I am new to Excel VBA and haven't a clue how to get started here. I have the following spreadsheet: ColA, ColB, ColC, ColD, ColE PID #, Type, Density, Expenditure1, Expenditure2 116211, NEW, 30, $130,943.46, $295,834.92 116211, Modify, 0, $130,943.46, $295,834.92 116211, Unk, 0...

HELP! I just had my computer rebuilt and a database that did work is now not working. It is freezing up on the following code to open a new instance of Excel: Set xlapplication - New Excel.Application I get a run-time error 48, which is "error in loading dll" I've loaded the complete access...

Hi Guys... this is just a query question - not code, I hope I am in the right spot! I have the following query... what I want to do is create a calculation for item ids of the same expenditure for total cost. Example: like items - AHB60590 component gives us a final cost of $16,555.25 How can...

Hi everyone... I've done update queries many times before but am having difficulties with this particular query. I've tried this a number of different ways... and obviously none of them work. Bottom line is that I have a field called POQty I want to keep the actual value of POQty but I also...

I am having a very hard time - what I have are some projects that have multiple values per row: PID QTY Date 12345 100 05/01/05 45678 200 05/02/05 12345 150 04/28/05 12345 175 04/25/05 What I would like to do is have one row with multiple columns: PID...

What if I want to assign each value (the array??) to it's own new field? Say y(1) - which would be ProdQty to it's own field? And the next value using that same ProjectPOId would be y(2)... until the next ProjectPOId is visited. Maybe that's not the way to go. I have an unknown number of...

Problems again: Runtime Error 13 Type Mismatch: bombing out on z = CDate(Mid(Left(i, Len(i) - 1), 1 + InStr(i, "("))) This was working the other day with the help of PHV... whats happened? I am clueless and can't seem to get this right. Public Function fblnMakeTable_F_ProdSched()...

What if I want to assign each value (the array??) to it's own new field? Say y(1) - which would be ProdQty to it's own field? Maybe that's not the way to go. I have an unknown number of entries per string and I was thinking it might be nice to know which position the text value was: 50...

Is there a way to use a wild card (or STARTS WITH) in an if/then comparison? What I would like to do is have something like this: If strProdSched <> "No New *" And strProdSched <> "Scheduled *" And strProdSched <> "" Then There are varying text strings after "Scheduled..." within a specified...

Does someone have a copy of some syntax on how to create a table using VBA? I have three fields I want to write to a new table: ProductionPOId, ProdQty, ProdDate This is what I have so far: Public Sub CreateTableTest() CREATE TABLE tblProdSched (ProjectPOId text, ProdQty LONG, ProdDate...