Recent content by Noson5434

Paste this code into a module: Option Compare Database Option Explicit ' Description: ' This module is designed to provide an enhanced InputBox function that masks ' password input with asterisks. It leverages Windows API calls to create a ' hook procedure that intercepts the activation...

To enhance your solution, consider utilizing the following method. You will need to include the following module: VBA JSON Public Function CalculateWeekdays(ByVal startDate As Variant, ByVal endDate As Variant, Optional ByVal includeHolidays As Boolean = False) As Variant On Error GoTo...

This should work. Public Function CalculateWeekdays(ByVal startDate As Variant, ByVal endDate As Variant) As Variant On Error GoTo Err_Handler ' Check if the end date is before the start date. If endDate < startDate Then MsgBox "End date cannot be before the start date."...

https://codekabinett.com/rdumps.php?Lang=2&targetDoc=windows-api-declaration-vba-64-bit

Perfect 👍👍

Any errors?

@Ana12322 See if this works.

I will review this tomorrow

I made some changes. See if you are still having issues.

I managed to find a solution that doesn't require VBA. Instead of using a UNION query, I created a stored procedure (SP) that generates a RecordCount. Then, on the form, I set the RecordCount to be invisible (Visible = False) and used the ContractID Expression RecordCount > 1. This successfully...

I will work on a sample db and post soon.

3

So I used the following function to Dump the results into the Immediate window. Private Sub DumpFormatConditions() Dim objFrc As Access.FormatCondition For Each objFrc In Me.ContractID.FormatConditions Debug.Print objFrc.Expression1 Next objFrc End Sub And the results were...

I will give that a try and post the results

I am using Access 2016