Search results

  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?
  16. J

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

    Dim ProcAllowanceNew As Currency Dim EffectiveDate As Date The following code works OK if there are values in Column(13) & (14) ProcAllowanceNew = Nz(Me.[strVADA].Column(13)) EffectiveDate = Nz(Me.[strVADA].Column(14)) If Column(13) & (14) are empty I'm getting Run-time error...
  17. J

    Query Not Returning a Record

    The query worked Thanks for the recommendations, I follow those recommendations in own databases, however I inherited this database and it is what it is
  18. J

    Query Not Returning a Record

    I have a query Out of Work TT (query) that is not returning a record: 083-74-7222 Last 2 First 2 I attached a TestHelp.mdb database for your review Member Info (table) Last First MI SS# Last 1 First 1 E 054645589 Last 2 First 2 083747222 Last 3 First 3 J 093843090 Last 4 First 4 J 126820943...
  19. J

    Run-time error 3251 - Operation is not supported for this type of Object rs.Index = "

    Moke Thanks for the clue, after further review the following seems to work Tables: How to perform Seek on Linked Tables http://access.mvps.org/access/tables/tbl0006.htm Thanks again for saving my butt
  20. J

    Run-time error 3251 - Operation is not supported for this type of Object rs.Index = "

    I removed the tick mark and get the same error I inherited this code, my vba is limited, i'm just trying to get the database split, the code works fine in the IUOE.mdb After the: Set rs = db.OpenRecordset("CodeWDOEpct") ', dbOpenSnapshot, dbForwardOnly) rs.Index = "id" There are a series of...
Top Bottom