Recent content by JGravesNBS

  1. J

    Run-time Error While Moving Field In Tabbed Forms

    Thanks for your help and for pointing me in the right direction, I haven't looked at this code for 20 years Looks like earlier versions of Access were more forgiving After further review, the field was locked, so I had to add the code to unlock, do the move, and lock FormState ("Unlocked")...
  2. J

    Run-time Error While Moving Field In Tabbed Forms

    Run-time Error While Moving Field In Tabbed Forms I have a tabbed form Name: TabCtl0 I'm trying to move the value of Me.strOwnerName in the Permit Information tab to Me.strApplicant in the Applicant/Contractor tab Name: Permit Information Page Index: 0 Me.strOwnerName Name...
  3. J

    VBA to Display References, Access 2000 through 2019

    Thanks, I’ll take aLook
  4. J

    VBA to Display References, Access 2000 through 2019

    Thanks, I’ll take aLook
  5. J

    VBA to Display References, Access 2000 through 2019

    There should be nine references: 1-Visual Basic For Applications Location: Language:English/Standard C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLL 2-Microsoft Access 16.0 Object Library Location: C:\Program Files (x86)\Microsoft Office\root\Office16\MSACCESS.EXE...
  6. J

    VBA to Display References, Access 2000 through 2019

    Thanks for the feedback The code change worked fine on Access 2000, output the six records, no error message When run on Access 2016 it put out the six references but generated an error VBA - C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLL Access - C:\Program Files...
  7. J

    VBA to Display References, Access 2000 through 2019

    I Need Microsoft Access VBA code to display active mdb database Reference information in the Immediate Window Here's what I have: Sub ShowReferencesInImmediateWindow() Dim ref As Reference For Each ref In Application.CurrentDb.References Debug.Print ref.Name & " - " &...
  8. J

    Access Navigation Panel

    How can I get an Access Navigation Panel, View By Details a One Liner showing, Name, Date Created, Date Modified and Object? In other words, on one line display the Object Name, Description, Date Created, Date Modified, and Object Type just we had in legacy Access 2000 Database Containers...
  9. J

    Access 2000 Runtime Question

    When I open a query using Access 2000 Runtime Switch, I open a query How can I select a query column and sort ascending and descending?
  10. J

    How do I get back back my live hyper-links?

    Thanks, great detective work, I would have never found this on my own How it got checked all of a sudden i'll never no Resolution: Word Options, Advance, Show Document Content, Uncheck Show field contents instead of their values
  11. J

    How do I get back back my live hyper-links?

    Using Windows 10 Word 2007 After several years with no problems, all of a sudden when I type: www.abc.com it gets formated as HYPERLINK {"http://www.abc.com"} It used to format as live underlined link www.abc.com When I open existing documents www.abc.com is formated as HYPERLINK...
  12. J

    How can I adjust the two statements to handle the null values?

    I had to move on a abandon my request above with the following solution: If NewAllowance Then EffectiveDate = Nz(Me.[strVADA].Column(14), Null) 'dteEffectiveDate If CDate(Me.dteVDATE) >= CDate(EffectiveDate) Then ProcAllowanceNew = Nz(Me.[strVADA].Column(13), 0)...
  13. J

    How can I adjust the two statements to handle the null values?

    The Column(13) & (14) are there but there is no value for the row selected. The following code works OK if there are values in Column(13) & (14) Compile error: Variable not yet created in this context on the following ?Nz(Me.[strVADA].Column(13), 1.25)
  14. J

    How can I adjust the two statements to handle the null values?

    Yes, that is the statement that is highlighted yellow in Debug When I change as follows: ProcAllowanceNew = Nz(Me.[strVADA].Column(13), 1.25) When I hover mouse over ProcAllowanceNew = 0
  15. J

    How can I adjust the two statements to handle the null values?

    Dim ProcAllowanceNew As Currency Me.[strVADA] is a combo box on a form I changed as follows and still get Run-time error '13' Type mismatch ProcAllowanceNew = Nz(Me.[strVADA].Column(13), 0) When I hover mouse over ProcAllowanceNew = 0 Where am I going wrong?
Top Bottom