Search results

That's because you're using lstFiles as the counter source and you are deleting from it, thereby nullifying the value of MyCounter. Change it to a two-step process. Go through and add everything to list2, and then go back and remove from list1. A much easier to handle this would be to have...

Here's how to get through all the items in a listbox. You should be able to take over from here. For ctr = Me.lst_Files.ListCount - 1 If Me.lst_Files.Item(ctr).Selected Then Debug.Print "Item " & Me.lst_Files.Item(ctr) & " is Selected" End If Next

No need to iterate through anything. A simple update query will do it: CurrentDb.Execute "UPDATE tblLog SET DaysToProcess = DateDiff("d",[IntakeDate],[CompletedDate]);" You can just copy/paste that into the immediate window and press enter and it'll do it for you. EDIT: Paul is right in that...

Are you replacing query_name with the name of your query, and ParameterField with the name of the field in the query that is the parameter? If not, that's two parameters missing in the SQL Select statement.

Using an array to do what you're doing is making it far too complex. Removing items from a listbox just isn't that hard. What exactly is the code you're using?

Change this: Set rst = db.OpenRecordset("query_name") To This: Set rst = db.OpenRecordset("SELECT * FROM Query_Name WHERE ParameterField = '" & YourFormControlName & "'") Or, if your Parameter field is numeric: Set rst = db.OpenRecordset("SELECT * FROM Query_Name WHERE ParameterField = " &...

The process from going Company to Batallion, and then Batillion to Brigade is identical, so I'll do the first one for you. 1) We want to update the company members that already exist in the batallion, so using the SSN, we look for matches between the two tables using a left join: UPDATE...

Lookup Collections in Access Help. In short, a Collection is similar to an array, but doesn't have a predefined size (and you need that feature, according to your description), and it can accept multiple data types (text, numbers, etc.) whereas an Array has a predefined size and only accepts...

So long as you have a SoldierID of some sort that's common to the table(s) where you are either updating or appending, this is easier than you think. Before I delve into that, do you have it structured that way already?

How are the two tables joined? If they aren't, there's your problem. You want something like this: tblBaClassSchedule tblBaStudentHistory StudentID --> StudentID Status EnrollmentStatus . . (other fields) (other fields) ...

This is code that would go in the click event of a Command Button named cmdCheckFields: Sub cmdCheckFields_Click() Dim strFieldChecks As String strFieldChecks = strFieldChecks & Switch(Nz(Field1,"")="","Field1" & vbCrLf, True,"") strFieldChecks = strFieldChecks &...

strFieldChecks = Field1 & Field2 & Field3 & Field4 & Field5 & Field6 If Nz(strFieldChecks,"") = "" Then MsgBox "All fields must be entered before continuing" Else --- All fields have something in them --- End If

It sounds like you're using a DoCmd here, in which case you'd put it like this: DoCmd.SetWarnings False --- Your DoCmd for the delete query here --- DoCmd.SetWarnings True The other way around this is to use CurrentDb.Execute, which doesn't require you to turn off the warnings...

Is there a reason you can't just import this table? All the Transfer actions (TransferText, TransferDatabase, TransferSpreadsheet) are pretty unreliable except under very specific conditions. I know that there are some unlisted limitations, and these functions typically have memory leaks as...

Me.ControlSource = ""

If you're appending to table Test and Test already has data in it, you don't want to get rid of your already imported data (most likely). So, the order is: 1) Delete data in Temp as shown 2) Import into Temp 3) Append to Test And yes, all under one button. If you do want to clear the...

More fun when it's a simple oversight instead of a huge issue. Glad it worked. :)

And what have you tried? Where are you stuck? In a simple outline: 1) You sell a steel casting with ID# ABC123 2) For some reason, Joe Blow decides it's not what he wanted and wants to return it. 3) You look up ID# ABC123 on an RMA form. On that form is the original sale date, price, etc...

Do the menus in all the other apps (Word, Excel, etc.) appear? Also, not to be accusatory, but is this a legitimate copy of Office or a "borrowed", downloaded, or otherwise obtained in some unintended way copy? Also, in Access with the blank menus, can you get to the code window by pressing...

This is probably going to involve a pretty big redesign, but before I go down that road, what is your definition of "really slow"? Initial observations (and please format the SQL in the future): SELECT DISTINCT DSSAPP_FULL_WIP_PROD_STATS.LOT_NUMBER...