Recent content by arnelgp

  1. arnelgp

    VBA add new records from list box to table - error

    maybe add On Error Resume Next: f Me.PriceListItemsPicked.ItemsSelected.Count = 0 Then MsgBox "MUST SELECT @ LEAST 1 ITEM" Exit Sub End If On Error Resume Next Set ctl = Me.PriceListItemsPicked For Each varItem In ctl.ItemsSelected rs.AddNew rs!CustomersID = Me.CustomersID rs!Customers =...
  2. arnelgp

    printing labels to selected rows/columns

    it's too late, just in case. please try this.
  3. arnelgp

    Help needed with a unique number ?

    to make it simple, just add a Delivery table. will hold the DeliveryID (Autonumber), WOTicket, DeliveryQty, DeliveryDate use combobox to select which WoTicket on the form.
  4. arnelgp

    Gantt Chart using Old IE Webbrowser control

    some minor fix, when the left pane is resized, each row's heigh increases/decreases but the right pane row does not change. have this fixed. the Task bars' height also increases/decreases proportionally. background is dimmed whenever pop-up window for New task or Edit task. also "remember" the...
  5. arnelgp

    Gantt Chart using Old IE Webbrowser control

    updated the chart to version 2. added ability to resize the task pane (left side) by dragging on the blue dividing line. note that you cannot narrow the task pane further if the delete (x) button will get hidden (or out of view). added Days and Status column on the Task pane. both task pane and...
  6. arnelgp

    Gantt Chart using Old IE Webbrowser control

    Many times I've seen someone aspire to have a Gantt chart. I have also made a simple one. And I also saw something more complicated. This comes from asking our favorite AI. It uses the old IE webbrowser control. I haven't thoroughly tested it yet. Put the .html file on same folder as the database.
  7. arnelgp

    Modern Calendar on Old Webbrowser control

    ask AI to update the VBA and html file to replace right-click with drag-n-drop to move events. also added code for recurring events. also added combobox for Years, so user won't have difficulty going to any year (starts with 2025 upto 2050).
  8. arnelgp

    Calendar template

    there is an Edge webbrowser calendar here: https://www.access-programmers.co.uk/forums/threads/calendar-that-works-in-the-edge-browser.335252/ for old version of ms access: https://www.access-programmers.co.uk/forums/threads/modern-calendar-on-old-webbrowser-control.335263/
  9. arnelgp

    Multi-board Kanban in Old IE-based Webbrowser Control

    Again this is a remake of Mr.Doozer's Kanban found in: https://www.access-programmers.co.uk/forums/threads/multi-board-kanban-in-the-edge-browser-control.335257/ It is using the Old IE-based Webbrowser control. Again, the "downgrade" was done by AI. I am surprised that AI now provided the code...
  10. arnelgp

    Multiple sub form problem

    here is also a simple demo and may not reflect with the record on your database. open MainForm and select from the combobox. //Edit: I change the code to always show the 16 subform.
  11. arnelgp

    Modern Calendar on Old Webbrowser control

    the original database (which is Edge-based webbrowser) can be found here: https://www.access-programmers.co.uk/forums/threads/calendar-that-works-in-the-edge-browser.335252/ the code is not mine and attribution goes to Mr.Doozer of the above thread. also the New code for old IE-webbrowser...
  12. arnelgp

    Adding badges over the Access taskbar icon

    this a job for super AI.
  13. arnelgp

    Query problem using "last"

    that is the catch, c&r, purge deleted records and reset the table, so Last() will not be reliable. it also resets all queries execution plan, i think. but i don't always use c&r, it might do harm than good, specially if power interruption occurs.
  14. arnelgp

    Query problem using "last"

    i don't know why are comparing excel against access. just prove that Last("FieldName") is not returning the "Last saved New record". you can also create a query from the table, sort it Asc or Desc (if you want). then on vba->immediate window: ?DLast("FieldName", "YourQuery")
  15. arnelgp

    Query problem using "last"

    just tested it both, in Excel VBA and Access VBA: format(cdate(0),"mm/dd/yyyy") they both return: 12/30/1899
Back
Top Bottom