Search results

The same way you would refer to a table (or query) cell in vba, for instance: =Tables![yourTableName]![field] works for a single record table, or a singe record result in a query; =Tables![yourTableName] may work for a multi-record table/query (not sure about syntax here).

Unbound form does not mean unbound textboxes. You can bind individual textboxes to different sources. Otherwise, what data could you you talking about to save on that form?

I use the button method daily. Multiple subforms, from multiple tables/queries, split database, 2 front-ends (customized), 2 institutions, 2 users.

Why?

Yes, I was talking about TextBox Controls. It saves to the place the control is bound to. I can assume the TextBox Controls are bound, otherwise why/how would he need to have an exit dialog "do you wish to save?" confirmation?

Need some more info, how do you go about opening the separate form? You should use something like: Then on the button, in the "Click" event something like: stLinkCriteria = "[IndexField]=" & Me![IndexField] DoCmd.OpenForm stDocName, , , stLinkCriteria, , , (or in the field "GotFocus"...

I often use unbound forms. Correct me if I am wrong (test it), but I believe that the form automatically saves all control changes on exit. I believe you need to go the way of the "undo" command to 'not' save the data, per each control. Like Minty said, you can use flags to track which controls...

How does your combobox filter your results? I am assuming you have some conditionals in the query that gets it's values from the combobox. If that's the case, an "empty" (or default value) combobox selection may have undesirable results. And from my experience, you can't put conditionals such as...

Hello s4p, here is my solution, it looks for other letters (alpha) before and after the string: Public Function FindCompleteWordInString(SearchStr As Variant, MatchStr As Variant, Optional Start As Long) As Long '.................................................................... ' Author...

Suggest a table for "all fields," and a query to represent the second one.

I would write the data from the Access query into a table (maketable query?) within a db, then import & link to a table in blank spreadsheet within an Excel workbook. Then, in another spreadsheet you could query the info from that (DLookup, DCount, etc.).

Retrospective analysis Parent form header: Option Compare Database Dim Error2185cnt As Integer Dim DB As DAO.Database Public GrvcTbl As DAO.Recordset, GrvtInfoTbl As DAO.Recordset Private Sub Form_Open(Cancel As Integer) On Error GoTo Err_Handler If Not ZeroLength(Me.OpenArgs) Then...

Yes, I forgot that the parent form opens GrcvTbl in the vba, and leaves it open, therefore yes there is a "loop" condition. I tried changing the offensive code to: ![LN_FN] = Me.Parent![LN_FN_input] and viola! It works great! Thank you both for helping me through that. FYI: I also changed the...

Ah, you missed the "With Me.Parent.GrvcTbl". That is a field in the current record in that table, which is also the source table of this subform, which begs the question: can I edit the value that way? I love it. I will try...

I just tested the entire subroutine, with the values: Me.Parent![LN_FN_input] = LN_FN (same as), causing the problem line to be skipped, and the rest worked fine (except for one tiny logging typo). So this one hang-up is the only thing stopping this "(write) update" button from working fine to...

Oh that's great, that's the sort of thinking that I am looking for - I didn't intend to allow editing directly from the control. But yes, I tried it and it worked. I verified that after closing the form the new edit was saved. But of course it still doesn't help fix the subroutine, just reduces...

I really thought that I had covered those bases with my OP. If I missed something, can you be a little more specific with your Q? Because I have already answered this to the best of my knowledge. I don't know what else to tell you.

It's actaully UpdateGrvnc_But_Click() I wanted to minimize disclosure (privacy issues).

Actually this is the entire procedure, attached, but I don't think it will help anyone answer this question. This is the module header: Option Compare Database Dim Error2185cnt As Integer Dim DB As DAO.Database Dim GrvtInfoTbl As DAO.Recordset ', GrvcTbl As DAO.Recordset Dim LogTbl As...

Subform, under "Update_But_Click()"