Search results

Currently I have a table which is linked to a sharepoint list. It contains all users in my organization with additional information. I'm using this data but it's missing some of the information that I need to track. My current solution is using this table as is and linking it to my own local...

Basically my subform is a glorified list box. I'd like to be able to select a record on it to display all of the relevant data on the main form. Subform is based on a much smaller query, but same data as main form. Parent / Child relationships don't work because main form filters the subform...

Just like my tittle says, on my main form I have a navigation control with a button to form in subject. So, here's the structure of the issue: frm_Main contains: Nav Control with button to frm_Members frm_Members contains: Search box txt_Search with code: Private Sub txt_Search_Change()...

Hello everyone, I'm really stuck on this one. I have a database which tracks status of fleet, and hours spent on each "Event". I want to use the data to show a chart, or a planner in a "tape" fashion and show each event in blocks of time. It's kind of hard to explain so I will include...

I have Run-time error '3077' Syntax error (missing operator) in expression error come up when trying to .findFirst in my recordset. 'Criteria' strCrit = "pkEventID = " & DMax("pkEventID", "tblEvents", "[fkAircraftID] = " & Me.cboTail & " AND [fldDateEnd] is null") 'Part of code'...

Good day, Can someone identify the reason for type mismatch error I'm getting for following code: If DCount("fldAuditDate", rstNewTable, "Format$(fldAuditDate,'yyyymm')='" & Format$(nxtInspection, "yyyymm") & "'") < intInsp Then Not sure if it's something obvious or not. I've tried putting #...

I have a date and time fields which displays what I want it to display. I've also set up an input mask for users to enter what I need them to enter. It looks like: However, when I try to edit the field it changes the format. When clicking on date field: When clicking on time field: How do...

Hello everyone, I'm struggling to understand how to normalize my tables. Please see attached screenshot below. Problem is my tblCause table has CauseID and Cause fields. However, certain causes might have a sub-cause which I'd like to add or remove to. How do I go about this? Edit: What I...

Good day everyone, I have the following error: Run-time error '3027' Cannot update. Database or object are read only. when using a certain form. On "Debug" it stops on following line of code: (Me.Dirty = False) Private Sub findWI() With Me.RecordsetClone If Not IsNull(lstWI.Value)...

I'm getting following error: Line of code: strLastAudit = Nz(DMax("fldDateClosed", "tblIQA", "fldDocID = " & fldDocID)) I've also tried the following: strLastAudit = Nz(DMax("fldDateClosed", "tblIQA", "fldDocID = '" & fldDocID & "'")) fldDocID is a PK in tblIQA, an auto number. Any ideas?

Hello! I have a database which I manually split. It contains no tables. Portal.accdb Next, I have a back-end file with all tables Portal_be.accdb Obviously tables are linked, everything works fine when using the application. These files are hosted on a server file folder. Next, I took...

Hello everyone! I'm having some problems with my combo box selection. I need to select an item from drop-down combo box and depending on the selection perform an action. In this example, a simple message box with yes or no. Private Sub cboReview_AfterUpdate() DoCmd.Save...

I get the run time error 2465 with this code: docxFile = Me.fldFolder & "\" & Left([WordDocs.Name], 25) WordDocs.Name is a filename with .docx extension I'm guessing i've got syntax wrong? Anyone know how to fix it?

I'm having issues figuring out how to fix this bit of code: Private Sub fldSerial_Click() DoCmd.OpenForm "frmDocRevDetail", , , "[fldSerial]=" & MaxOffldSerial End Sub MaxOffldSerial contains a hyphen. It looks something like this: DR-22-001. When I click on the field, it opens the...

Hi all, This is my continuation of previous thread. I figured this could be it's own thread since it's a follow-up question. I would like to use date value returned in my code and check if the month of that date is also present in another recordset which I use to activate/deactivate certain...

Hello all, I want VBA to calculate field next due inspection one year out, but if it lands on a month which already has 3 inspections then I want it to go to next available month short of a year. (Example: if one year out = May which is all booked up, then I want it to check April, and so on...

Like the title says, when I try to add a new record to my subform via a button, it doesn't work UNLESS I manually enter some information in the first field then save it. My button has the following code: Private Sub btnSave_Click() With CurrentDb.OpenRecordset("tblObservation") If...

Hi all, I just don't understand why it's not working... Private Sub fldIQAID_DblClick(Cancel As Integer) DoCmd.OpenForm "frmIQA", , , "fldIQAID = " & Me.fldIQAID MsgBox "Your ID is " & fldIQAID & "" End Sub Few details: MsgBox shows that the ID it pulls is correct, but the form opens...

Hello all! With the code below, I have RsHPOD!fldIQA = RsHPOD!LastAudit + 365. What I want it to be is as follows: I want = RsHPOD!LastAudit + 365, ONLY IF the month of result matched ONE OF MONTHS in another table which contains list of dates as date "fldMonth" and checkbox field...

I've got two forms, one is for list of users "frmMembers" and another to get new users via outlook application code "frmNewMember". Once I click on "OK" button "cmdOk" it runs the following code: Private Sub cmdOk_Click() Dim Fail As Boolean: Fail = False ' Check to ensure the...