Search results

Report "SafetyInfoControlsubreport" Set RecordSource Property to: SELECT RiskAssessmentID, Activity.ActivityID, ControlMeasure, HazardRef FROM (Hazard INNER JOIN (Activity INNER JOIN ActivityHazard ON Activity.ActivityID = ActivityHazard.ActivityID) ON Hazard.HazardID =...

Private Sub UpdateRecordsIfIsEmpty() ' Copying the data from table "Investments01_Appendix" to the table "Investments01_tbl", _ ONLY if the same field name in table "Investments01_tbl" is empty...

Thank you very much for the information. It is very important!

This option starts Microsoft Access without displaying the startup dialog box. You are right - it is acceptable without this option.

Try this way: Сreate a shortcut (on the desktop) with a command like: "C:\Program Files\Microsoft Office\root\Office16\MSACCESS.EXE" "D:\MSAProjects\YourFolderName\YourAppName_v001.accdb" /NoStartup Then set desired icon to this shortcut.

I think = Yes. I solved a similar problem this way:

Check out example below please

Try : Private Sub TestPlayWaveFile() '... \Sounds\potion_gulp.wav strSound = CurrentProject.Path & "\Sounds\potion_gulp.wav" PlayWaveFile StopWaveFile End Sub ... Works!

The same code with less strings:

One more solution: ' ... Set rst1 = CurrentDb.OpenRecordset("Data_1") If rst1.RecordCount = 0 Then MsgBox "There are no records to export!", vbExclamation, "No entries" rst1.Close Set rst1 = Nothing Exit Sub End If ' ...

Try that query: SELECT 0 As Expr1,EstimatePK, OrderedPartsPK, ReqRecID, ReqOrderedPart, ReqOrderedPartChanges, ReqOrderedPartName, RegisteredOn, ReqSupplierFK, ReqQuantity, ReqUnitFK, ReqRemarks, ReqUnitPrice, OtherExpenses FROM tblEstimate WHERE ReqOrderedPart LIKE...

As I could see your field is named as "Return" so use command : Me.Return.SetFocus

Try something like this: Private Sub PGInStatusBarTest() 'ProgressBar in StatusBar 'More info: https://www.codevba.com/fragments/Access_StatusBar.htm#.Yy_eLExBxrw '--------------------------------------------------------------------------------------------------- DoCmd.Hourglass True 'True...

Yes-s-ss. - It is! Use Custom Menu for TextBox.

Can you post a copy of your application with just the form (with subforms) and required tables/queries. Just a few (fictitious) records to understand.

Take a look at that page: Unrecognizeable Database format 3343

See to Query " frmLeave_SubForm_Details" as example: SELECT [Leave Dates].*, GetDaysEFH([Start_Date],[End_Date]) AS DaysEFH, [Days]-GetDaysEFH([Start_Date],[End_Date]) AS EFH_Difference FROM [Leave Dates]; Try change some dates ([Start_Date] and [End_Date]) in query ...

Copy the function into any external module (not a form module), then you can use it along with other functions in forms, queries and reports.

Can you post a copy of your application with just the form (with subforms) and required tables/queries. Just a few (fictitious) records to understand.

Take a look at example below please