Search results

I prefer more readable field names (with underscores and without other delimiters such as spaces, dots, commas, brackets) Review_date Submitted_date Approved_date Completed_date

main query stream Student ID student name years gradedesc term Sum of mark Avg- Mark Class Rank Stream Rank Class Rank2 avg Stream Rank2 avg WEST 83 MERCY CHEBET 2022 FORM 1 Term 1 260 65 2 2 1 1 WEST 9 SHEILA CHEBET ISAAC 2022 FORM 1 Term 1 180 60 3 4 2 2 WEST 23 GILBERT KIPKOECH 2022...

I didn't really understand how LASTEXAMS TOTAL MARKS differs from TOTAL MARKS

I prefer pre_installation_inspection_date-much more readable and without spaces, otherwise square brackets will be needed

without an example of the base, I didn't really understand what you want to do Private Sub OrderType_AfterUpdate() Dim TmpTxtHeading As String Dim NewTxtHeading As String dim s1 ''''''''''''''''correct Dim rst As dao.Recordset '''''''''''''''' Set rst =...

dim s1 s1= DLookup("[HasAccess]", _ "tUserAccess", _ "[UserAccessID]= " & TempVars("UserType") & " AND [FormName]='" & Me.Name & "'") if isnull(s1) or s1=false then MsgBox "You dont have access! " DoCmd.Close acForm, Me.Name End If

21mb is not much, the archive will probably be less than 7 MB, it seems to be allowed by the forum

the main thing in your task is filters by faculty, semester, group, subject, price list, publisher,.... they will help you view the information and it is on the selection that you will issue reports until you have laid out an example of the database, and the database, even in a draft version...

sorry that I borrowed your table , the list is not the only solution, it is quite possible to do with a field, especially if the list is long, it will be difficult to see the choice in it I offer an example based on a field with a value of 0 2-4 -5 6-7 9, in which 0 show fields with no...

the simplest option is via find/replace for the project find debug.print replace 'debug.print in the whole project

I removed the column signatures, so it's clearer to me

Apparently you made a mistake with the name of the form - all spaces and quotes/apostrophes work fine Private Sub combobox1_Click() Dim s1 s1 = Me.combobox1 & "" If Len(s1) > 0 Then DoCmd.OpenForm s1, acNormal End If End Sub

try try DoCmd.OpenForm """" & Location & """"

SELECT TblHeadk.Nz, TblHeadk.da, TblGL.AccId, TblGL.AccName, TblGL.cer3, TblGL.deb3, TblGL.des3, DateDiff("d",[Da],Date()) AS InvoiceAging, nz([deb3],0)-nz(TblGL.cer3,0) AS m00, IIf([InvoiceAging] Between 1 And 30,[deb3],0) AS [1-30], IIf([InvoiceAging] Between 31 And 60,[deb3],0) AS...

first, check what Me.txtNotes is, maybe it's null - an empty string , try to work around it Dim strSQL As String,s1 as string s1=Me.txtNotes & "" s1=Replace(s1, "'", "''") debug.print s1 strSQL = "UPDATE tbl Inspection Event " & _ " SET Notes = '" & s1 & "' , " & _

maybe at the same time the subordinate form opens only for reading

perhaps there is a line on error ...., but in TOOLS there is a check mark stop for all errors it is necessary to stop for unprocessed errors

I would do this - there is a main ribbon form with dynamic search for the value of any field (conditions in green fields, the code is not written) - - the yellow fields on the form should be protected from correction, they are only for selection - pink fields for calling subordinate forms (there...

an example of a database would be more useful for understanding your task the week from December 27 to January 2 is more interesting, what is the number of the week and what year it belongs to

remove unnecessary fields, leave only the necessary grouping fields and fields for the SUM SUM, the ID field can be applied to the quantity, the COUNT function the problem is that someone else's information is on the site, you need to study on your own base, although you still need to read the...