i agree that the blur is not pleasant to the eyes.
but you may try to increase the blur radius, say 20 instead of 5, and you will see it is more pleasant.
It is sometimes desirable to darken the background when a Msgbox appears
so as to catch the attention to the presented message or warning.
This is not new, but just wanted to share if it can be of use to you.
The code can be used on older Ms Access.
Open frmDemo on the attached.
this is true, you need to change your code:
Do Until RS.EOF = True
Debug.Print RS.EmailID
' SendPDFReportAsEmail
'Currently commented out for testing
RS.MoveNext
Loop
the code for the saving image and blurring is generated by our favorite AI friend.
demo will show you how to "simulate" blurring of the background so you
can pay more attention to the Msgbox presented to you.
the demo forms are using "Tabbed documents" (not overlapping).
so that frmOverlay can...
you should change all Joining lines.
right-click on each relation line and choose: Join Properties
and from there choose:
"select all records from OrdersT..."
do this to all your relation lines.
you should have this:
is the report based on query and the query is getting the filter from the form?
it's hard to guess, without seeing what is going on on your form/report.
I cannot add new update on the original "cheap alternative to access imagine" thread since it is already closed.
With this update (form frmCamera2) there is no need to configure the camera (unlike before) before it can be used to take
a snapshot.
You may want to experiment with various...
can you issue Requery on those 3 Textbox on the Footer, like:
Private Sub Form_Current()
[TotalMinutesTextbox].Requery
[TotalHoursTextbox].Requery
[TotalHoursMinutesTextbox].Requery
End Sub
on you can use the Form's Current event.
you may try this:
Private Sub cmdExportToWord_Click()
' Code to export and save data to MS Word Template
On Error Resume Next
Dim objWord As Object
Dim wdDoc As Object
Dim strPath As String
Dim AnswerYes As String
Dim AnswerNo As String
strPath = "C:\templates\mytemplate.dot"
Set objWord =...
there is a sample in our Code Repository bank, and is uploaded in Github.
https://www.access-programmers.co.uk/forums/threads/serial-com-ports-in-access-vba.324523/