Search results

  1. Eugene-LS

    Syntax to populate a field in a subform based on another field in the same subform

    In sub form module: Me.DestFieldName = Me.AnotherFieldName
  2. Eugene-LS

    Solved VBA - Form update boolean field

    You have two erroneous lines in your code. Replace them with the ones below: CurrentDb.Execute "UPDATE 201Assets SET AssetFlag = True " & _ "WHERE stdid=" & Me.subformAssets.Form.Recordset.Fields("stdid")
  3. Eugene-LS

    Solved Programatically change color on continous form conditional formatting

    https://docs.microsoft.com/ru-ru/office/vba/api/access.formatconditions.add https://www.access-programmers.co.uk/forums/threads/conditional-formatting-the-field-based-on-the-value-of-another-field.301500/
  4. Eugene-LS

    Solved Now allowing Sub-form to update table based on condition in subfrom

    Oops! Please forgive me generously. I can't see well this morning ....
  5. Eugene-LS

    Solved How to find out the ID of the record to which I am trying to add a duplicate

    Dim sVal As String, vVal sVal = "[Customer ID] = " & Me![Customer ID] & " AND [Customer First Name] = '" & Me![Customer First Name] & "'" vVal = DLookup("[Customer ID]", "[Your Table Name]", sVal) If vVal > 0 Then 'Found ... ' ... Else ' ... End If
  6. Eugene-LS

    Solved How to find out the ID of the record to which I am trying to add a duplicate

    Yes - it Is possible - For example by DlookUp() function. DLookup Function in Microsoft Access
  7. Eugene-LS

    Tried 11 yet

    You don't need that already! My computer doesn't match either (i have no TPM2 module). I installed myself from the original image - everything works
  8. Eugene-LS

    Solved how to listbox for specific record

    There could be many causes for this Can you post a sample form with the necessary tables
  9. Eugene-LS

    Solved Filter characters or remove spaces or allow particular characters

    Private Sub YourTextFieldName_AfterUpdate() Dim s As String Dim t As String Dim i As Integer 'Clearing the field value of all characters except digits s = Me.YourTextFieldName & "" Me.YourTextFieldName = Null For i = 1 To Len(s) t = Mid(s, i, 1) If IsNumeric(t) Then...
  10. Eugene-LS

    Solved Append Query Key Violation

    Before adding new records to table "INTAKELOG" you should have "Relation key ID" record in table "CLIENTS" for each new record. ... And read: Introduction to data types and field properties - that's about second screenshot from post #28 ...
  11. Eugene-LS

    Solved Append Query Key Violation

    There are some functions for data transform ... TimeValue() for example ... ... My local time is late, I'm tired. I leave you in the good hands of the experts of this forum. Good luck!
  12. Eugene-LS

    Solved Append Query Key Violation

    That's why !
  13. Eugene-LS

    Solved Append Query Key Violation

    Some fields are perplexing ...
  14. Eugene-LS

    Solved Append Query Key Violation

    Two fields were missing in the file: "MASTER DATA EXPORT TEST.xlsm"
  15. Eugene-LS

    Solved Append Query Key Violation

    Ye-e-e-e-e-s-s-s-s! That's right. But I worked with the file that was posted and there were really two fields missing. I didn't make it up any more ...
  16. Eugene-LS

    Solved Append Query Key Violation

    @JED25 - query works: INSERT INTO [INTAKE LOG] ( ADMISSION, [CLT ID], INSURANCE, [REF BY], LOC, DISCHARGE ) SELECT [INTAKE LINK].ADMISSION, [INTAKE LINK].[CLT ID], [INTAKE LINK].INS, [INTAKE LINK].[REF BY], [INTAKE LINK].Loc, [INTAKE LINK].DISCHARGE FROM [INTAKE LINK] LEFT JOIN [INTAKE...
  17. Eugene-LS

    Solved Append Query Key Violation

    That's better! Looking at the material ...
  18. Eugene-LS

    Solved Append Query Key Violation

    И где Excel файл - А! ??? Вы думаете - или нет? ... :( ... EN: And where is the Excel file - Ah! ??? Do you think - or not? ...
  19. Eugene-LS

    Solved Append Query Key Violation

    You are not the only one who has this kind of thing Just replace sensitive data with meaningless text by using update queries.
Back
Top Bottom