Recent content by billmeye

  1. B

    How do I hide a tab if a checkbox is checked

    You just need to refer directly to the specific tab's control name, you don't need to include the overall tab control: [code] Private Sub Form_Load() If Me.AddToSPA = True Then Me.Page2.Visible = True Else Me.Page2.Visible = False End If End Sub [code]
  2. B

    Leave Bal

    I've added another query, qryDetermineVacBalanceByDay, that shows it by day.
  3. B

    Leave Bal

    I've attached an example you can review to see if it can help with your program. In general, it's not good practice to store a calculated value, such as vacation balance, instead use queries to do calculations and use that result for a form or report. My example contains 3 tables: Employee...
  4. B

    Need Help in pause & resume time calculation

    Your welcome.:)
  5. B

    I need help with a calculated time query.

    If you are trying to add to a date you should use the DateAdd() function. ... DateAdd("h",23,[loadtime].[EstimatedTime]) ... This will add 23 hours to the value stored in [loadtime].[EstimatedTime]. If you are trying to determine time between 2 dates use the DateDiff() function. ...
  6. B

    Need Help in pause & resume time calculation

    Attached is an example of how to accomplish that goal.
  7. B

    Subtracting a value on the current record from the value of a previous records issues

    Glad to hear things are working out for you, good luck with the rest of your project.
  8. B

    Subtracting a value on the current record from the value of a previous records issues

    You can use the same procedure and adjust Function SysHop2Up() Dim Rst As DAO.Recordset, MySql As String Dim PrevSysConID, SndPrevSysConID As Long Dim X As Integer For X = 1 To DMax("[sysAccountID]", "tblSystemConfiguration") If DCount("*", "tblSystemConfiguration", "[sysAccountID]=" & X)...
  9. B

    Subtracting a value on the current record from the value of a previous records issues

    Here is a function you can run to get caught up. Only need to run this one time and then after that your form does the current records. You can place this code in a module and run it from the immediate window, Call SysHop2Up. Function SysHop2Up() Dim Rst As DAO.Recordset, MySql As String Dim...
  10. B

    lock to view/modify

    Make an MDE or ACCDE version. That locks the user out of any database design features.
  11. B

    Subtracting a value on the current record from the value of a previous records issues

    Change: If DCount("[sysSystemConfigID]", "tblSystemConfiguration", "[sysAccountID]=" & _ Forms!frmTempestCoordination!accAccountID & " And [sysSystemConfigID] <" & [sysSystemConfigID]) = 2 Then 'will only fire on the 3rd record
  12. B

    MDE File - Lock it (no table, shortcut keys, menus, navigation pane)

    There are many properties that can be accessed to turn things off but there is only so much you can do. 'PROGRAM STARTUP OPTIONS Const DB_Boolean As Long = 1 80 ChangeProperty "StartupShowDBWindow", DB_Boolean, False 90 ChangeProperty...
  13. B

    Subtracting a value on the current record from the value of a previous records issues

    If you don't want it to fire until there are 3 records, use the Dcount() function to count how many records were entered prior to the current record and only allow it to fire if there are 2 or more records prior to the current record. If DCount("[sysSystemConfigID]", "tblSystemConfiguration"...
  14. B

    populate a combo box control on form 2 depending on which form (form 1) opened it.

    Use the Docmd.OpenForm OpenArgs property. DoCmd.OpenForm "frmAddBook", acNormal, , , , , "W" The OpenArgs is the last variable in the command and here is where you can put W, M or R. Then, in the forms On_Open event do something like: If Not IsNull(Me.OpenArgs) Then Me.ComboBox1.DefaultValue...
Back
Top Bottom