Search results

  1. X

    Adding the on scroll event and detecting the first visible Id on continuous forms.

    With this approach, it is not possible to hide the "dummy control". This utility relies on the color of a pixel on the “dummy control,” so it has to be visible. You can try to make the “dummy control” quite small but always visible. I would like to mention that there are some known issues that...
  2. X

    Adding the on scroll event and detecting the first visible Id on continuous forms.

    Yes, you are absolutely right. Now fixed in version 12. Thanks for letting me know. I apologize for the inconvenience.
  3. X

    Adding the on scroll event and detecting the first visible Id on continuous forms.

    As far as I know, there is no easy way to detect when records are scrolled in a continuous form using the vertical bar for example. This example attempts to fill this gap by using a class that detects when records are scrolled using a tricky method: - In the details section, there is a dummy...
  4. X

    Convert all the old check box controls on continuous forms to a modern style.

    This is another approach of the example I upload a few days ago: https://www.access-programmers.co.uk/forums/threads/convert-all-the-old-check-box-controls-on-a-form-to-a-modern-style.335129/ This example uses image controls to display the checkbox status and a transparent button to toggle its...
  5. X

    Overview of subsequently added object properties that are only accessible via the "Properties" collection.

    Today I came across this one working with an image control: Debug.Print Me.ImageCtl.Properties("ControlSource").Value Me.ImageCtl.Properties("ControlSource").Value ="SourceString" EDIT: To late, I noticed that's in the first post:censored:
  6. X

    Convert all the old check box controls on a form to a modern style.

    After reading this article by Colin @isladogs : https://www.isladogs.co.uk/settings-form-toggle/index.html, I thought it would be a good idea to find a simple way to convert existing forms with many checkboxes to a new modern style easily. So, I came up with the idea of creating a form wrapper...
  7. X

    Weird Issue

    Splitting databases is the main reason to avoid weird errors. I think that most of gurus here can't help you on an unsplitted database.
  8. X

    How to Create multiple vertical lines that grow in the detail section of a report

    I think you have the code in the page section instead of in the detail section.
  9. X

    How to Create multiple vertical lines that grow in the detail section of a report

    Try this code in the Detail_Print Section. It draws 3 different vertical lines. In this example you have to set the LeftPosition value in TWIPS. Dim LeftPosition As Single Const MAX_HEIGHT_SIZE As Single = 32767 ' This limit correspond to the section’s actual rendered height, not...
  10. X

    MS Access Tooltips replace.

    This is an example how to replace the behaviour of tooltips in MS Access using classes. Some of the options are: - Tooltips are displayed with no delay. - Tooltips with or without Icons and titles. - Customize font and background tooltip text colors. Diferent customizations can be applied to...
  11. X

    ACCDE - "Requested type library or wizard is not a VBA project"

    This error: ACCDE - "Requested type library or wizard is not a VBA project" raised to me when using an ACCDE library on an ACCDE main database . Is that your case? Do you use any MS Access library?
  12. X

    Solved Password the DB how to:

    If I'm not mistaken, the code you have found opens another MS Access instance. If you want to open a BE password protected from the Front End you'll need something like this: Dim MyBE_DB as DAO.Database Set MyBE_DB = DBEngine(0).OpenDatabase(BACKEND_PATH_AND_FILE, False, False, "MS...
  13. X

    Solved Report not Opening

    Easy, I created a new database and imported all the objects.😉
  14. X

    Solved Report not Opening

    mloucel Don't ask me why, but if you add Docmd.Restore when opening the report, it works! Private Sub Report_Open(Cancel As Integer) DoCmd.Restore ' Line to add Me.Filter = Forms!ReportFormForAuthorizationsF.Filter Me.FilterOn = Forms!ReportFormForAuthorizationsF.FilterOn...
  15. X

    DSum on a Form from Date - I hate dates :-(

    Another way to strip away time from any field [ArbitraryDateTime] is: DateValue([ArbitraryDateTime])
  16. X

    Sum of Fields Running Error on Report

    After some tests I find out that the controlsource property max length is : 2048, and the maximum number of fields in a sum is 100. Screen 1 Screen 2
  17. X

    Label not showing on subform if value is 0

    I've tested the arnelgp code indexing on the Region field and it's surprising how some Dcount() improve their performance and others don't. === Withoud indexing============== DCount("*", "SalesRecord", "Region='Europe'") Result: 271901 in 0,14453125s DCount("Country", "SalesRecord"...
  18. X

    Label not showing on subform if value is 0

    I'd like to add that if there are Null values in the column you are counting you may get unexpected or unwanted values. DCount("*", "SalesRecord") Result: 1048575 in 0,015625s DCount("Country", "SalesRecord") Result: 1048570 in 0,125s DCount("1", "SalesRecord") Result: 1048575 in 0s
  19. X

    Never seen this error linking a form

    C&R means Compact and Repair. I'd also suggest to decompile the database.
Back
Top Bottom