Search results

a more workable version of what you have though (although I agree with pat that you should probably look at table structures etc) is Private Sub MM1_YY_LostFocus() Dim strDate as String, strCell As String Dim intMM as integer, intYY as integer, intCount as Integer, i As Integer strDate =...

i wonder if using vbWhite and vbGrey will do what you want as well (these are predefined colours for things like textbox backgrounds etc)

hmm... ok, try something like this as the sql statement sql = "SELECT COUNT(*) FROM <tablename> WHERE " & a & " IN ('1','2','3','4','5','6','7','8','E','A','B','N','W','D','T','Q')" This will find all the records in the table that has your criteria in fieldname a, and count how many records...

Dim rs as DAO.recordset Dim sql as string <Set up your sql statement here and store it into the string sql> Set rs = CurrentDB.OpenRecordset(sql) then you should have no trouble getting the value out of the recordset hope that helps

Set olAppWide = New Outlook.Application

Multidimensional array Diim arrayname (X, 2) As for looping through the array, look into the LBound and UBound functions Hope this helps EDIT, a brief look deeper revealed these Dim arrayname(2, X) for a 2 column, X row array and Dim something as Varient For Each something in arrayname...

WHERE (([EMPLOYEE SHIFT].SHIFTNAME) ='"& Me.SHIFTNAME & "')); " try the above

well, the most glaring ommission is what you are going to compare the shiftname to in the where clause. You should have ([EMPLOYEE SHIFT].SHIFTNAME = <some comparison here>)

umm... sounds like you really want a spreadsheet, not a db

ok.. if you want to use an ADO recordset, then why not try the following as the recordset command(s) Dim conn as new ADODB.connection Dim rs as ADODB.Recordset conn.connectionstring = <your connection string> conn.open Set rs = conn.Execute("SELECT SUM(QtyGood) AS Total FROM <table>")...

tis ok. I like to help, and also like to give people the fundamentals of SQL, as it helps for if they ever use a DB other than access

You need to be able to define exactly how the firstname is going to be obtained, then make sure the code follows this. Computers, unfortunately, can't yet look at a string and say 'this is the firstname and this is the lastname' without being told exactly how to get the firstname, and exactly...

or maybe you need to do ReDim NPVarray (-1 to Count)

hmm... looking again. do you need to pass NPVarray() or NPVarray ? It could be complaining because you are giving the subscript reference symbols(read - brackets) without giving a reference.

wouldnt using a for loop make more sense here? For n = 0 to count NPVarray(n) = value Next n seeing as you are using the while loop as a for loop anyway

umm... upper and lower case are important when doing sql searches... the criteria is case sensitive anyways. Should probably check that out.

hmm... upper and lower case correct as well?

I wasnt questioning that it works, was just wondering why you have an argument thats overwritten with a public variable with 2 lines of code

ok... are you searching for an exact match? if not, use [field name] LIKE '*string*' don't you love sql? :)

ah yeah... lovely lovely access. If it has a space in the fieldname, put the field name in square brackets, like so [field name]