Hello programmers,
I have this code in the detail section of the report. The problem is that all the checkboxes are not visible eventhough they have check marks. What can I change to make the checkboxes that are checked to be visible and of course the not checked not visible?
Private Sub...
Hello programmers,
I have this code on a drop down box in a form. It works well if the numbers are greater or equal to 100. If I select for example a number 28 it brings up 128. Please take a look and let me know where I have gone wrong. Thanks for your assistance.
Dim rs As DAO.Recordset...
Hello,
How can I get the propertyid to equal 1 & 2 & 3 if the propertyid selected from the form = 12? I have the code below placed in the form which is transfered over to the report.
On Error GoTo Err_Preview_Click
Dim strWhereProperty As String
strWhereProperty =...
Hello programmers,
I entered this code below in the after update of a drop down box in a form. The string strFilter works well after the selection is made but the strFilterTwo doesn't unless you select it again from the drop down box and then it does the update. Any insights?
Private Sub...
Hello programmers,
How would I go about a report that is half the size of an 8 1/2 x 11 laser printer sheet print the same information that is on the upper half to the lower half of the same sheet in order to save paper and print on the upper half page one and the lower half page two?
Thank...
Hello programmers,
I have this code in Visual Basic and I would like for it to check for the first of every month rather than current month. How can I change this code to correspond with my request?
<= DateSerial(Year(Date()), Month(Date()), 1)
Thanks,
Felix
Hello programmers,
I have a module called mdlQuantity. And I would like to run the module from a macro. The only option I see in the macro action is OpenModule. How can I get this module to execute from the Macro?
Sincerely,
Felix
Hello programmers,
I am trying to set the setfocus command to an option box. The error I get is:
Run-Time error '438':
Object doesn't support this property or method
This is what I have in code:
If IsNull(Forms!frmMembersEdit!RepresentativeID) Then
Me!Cleared = No...
Hello programmers,
On open I have a form activate this procedure:
Private Sub Form_Open(Cancel As Integer)
If Me!CommNumber = 1 Then
Me!Cleared.Enabled = False
Else
End If
End Sub
The problem I am having is that the all the rows which all have the field [cleared]...
Hello programmers,
I am having a terrible time with trying to use the dbOpenSnapshot. Here is a code and please feel free to correct the many mistakes I made:
Private Sub Form_Close()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set rs = Me.Recordset
Dim i As Integer
Dim j...
Hello programmers,
When I request a report to print I get an error with this code. I have this activate in the detail section with the event procedure on format. I am sure this occurs because there is no data to be displayed. How can I stop this code from running if the data is null?
Sample of...
Hello programmers,
I have a subform with the option to check off a yes/no field that when a user checks off the yes/no to equal yes it performs this operation:
Set db = CurrentDb
Set rs = db.OpenRecordset("tblCommissionsPaidSub", dbOpenDynaset)
If Me!Cleared =...
Hello programmers,
I have a tab control page form and when I click on another tab page ex. page2 I would like to be able to check if a field on page1 is not null before activating page2 entry mode. How can I perform this function?
Thank you,
Felix
Hello programmers,
I have this code in a subform that is supposed to execute and stop at the end of subform data. This is the code:
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim i As Integer
Dim j As Integer
Dim stDocName As String
stDocName =...
Hello programmers,
I have this code in VB:
.Fields("PaymentsDate") = Me!DateOfPlan + i
.Fields("PaymentsDate") = Me!DateOfPlan + i
etc.
I would like to correct this code with the current month beginning, next month beginning, mid, and end of month dates.
Sincerely,
Felix...
Hello programmers,
I have a form that when it exits it runs this code:
Private Sub Form_Close()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim i As Integer
Dim j As Integer
Dim stDocName As String
stDocName = "qryPickupSubPlusQnty"
Set db =...
Hello programmers,
I have a form that when it exits it runs this code:
Private Sub Form_Close()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim i As Integer
Dim j As Integer
Dim stDocName As String
stDocName = "qryPickupSubPlusQnty"
Set db =...
Hello programmers,
I have a form that when it exits it runs this code:
Private Sub Form_Close()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim i As Integer
Dim j As Integer
Dim stDocName As String
stDocName = "qryPickupSubPlusQnty"
Set db =...
Hello programmers,
I have a frame (option group) inside a form with options Monday - Sunday. How would I disable the user from being able to select for example the option Monday if a field on the form equals a certain criteria?
Thanks,
Hello programmers,
If I place this in a VB function:
[Date2] = Date - Weekday(Date) + 2
field [Date2] being today's date of Monday 07/21/03 would it equal Date - Weekday(Date) +2? If not what would be the correct formula for them to equal?
I am trying to get a condition to run if true ex.
If...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.