Search results

Sounds good.

Glad I could help. Btw: dosent really matter here, but it's just good programming practice. Matters for repitition. Replace: If r - 1 = 0 Then With: If r = 1 Then Replace: If r - 1 = 1 Then With: If r = 2 Then When doing big repitition, saving the extra calculation per repitition is nice.

Two tables, tblOrderTemplates (where you store the order information) tblRepititions (where you store the repitition info and the templateid) Make some vba code that checks what orders need to be put in each day and then make the code add those orders. Make a macro that runs the code. Drag...

Expression: IIf(Hour([Timefield])>=12,"PM","AM")

Whoops.. you can remove that, i originally was goin to do that but remembered you cannot do that. So i removed the code related and used a simple counter, just missed part of the SQL... BTW: Since he's doing a Message Box, i did it with code, and since it's a small number of records... who...

Here's an example. db22.mdb would be the one on your network. db23.mdb is the db on your computer with everything else. (Open this one for code/example) Boox1.xls is the file you would replace each week. I had mine all in c:\ so give it a shot there (so the linked tables dont screw up atm) Ok?

Try: Me.TribeOrgName =

Also did another test, turns out <> is ever so slightly faster than = On a repitition of 100000000 <> was about 0.4 seconds faster than = We're dealing in the 7-10 second range here btw, so that's 4%-5% faster.

How many of you have been programming and needed a simple two way conditional aka if blah = blah then ..... else ..... end if, where one way does some less relavant code, and sometimes wondering how you should structure you're logic (aka, where relavant code should be...) I recently conducted a...

VBA Code: Dim rst as DAO.Recordset Dim sql as string, recordlist as string, msgboxstring as string Dim r as Integer sql = "SELECT *, Count([Accounts]) FROM tblInvalidAccounts" Set rst = CurrentDB.OpenRecordset(sql) r = 1 While Not rst.EOF If r = 1 Then recordlist = rst("Accounts")...

I got my job in May? (I Think) I haddn't even touched access (well maybe once and was like... wth is this.. and quit.) and i picked it all up from there. Link a table to like c:\mysheet.xls and every time you get a new one just put it there. Left click on the linked table. Wait 3 seconds...

because it smells

Another method is make a "Make-Table" query that sorts the data. Make it into another table, now the new table should be sorted the way you need. Now you can export from that table.

them are neutered.

O.o, my algorithm calls for unsigned addition of 4byte numbers >_<

a really stupid

Make sure in you're table the ID is a primary key. Link the excel spreadsheet and then rename the link to Excel-Linked Make an Append Query that appends all the records from Excel-Linked to whatever your local table is, Name it qryExcelUpdater Then make a Function (or build it in a clickable...

Make a new field like this: Range: IIf(Hour([Timefield]) Between 6 And 9, 1, IIf(Hour([Timefield]) Between 9 And 16, 2, IIf(Hour([Timefield]) Between 16 And 19, 3, IIf((Hour([Timefield]) Between 19 And 24) OR (Hour([Timefield]) Between 0 and 6), 4, 0)))) It *should* work. Edit: Forgot to...

Actually, better yet... how do i make them unsigned?

Ive worked out that whole problem now (had to do many binary->decimal->binary conversions) Now i need to know what type is a 4 byte number. I think integer is a 2 byte... but i'll ask you all: What is a 4 byte storage type, Double, long, integer... ect...