Recent content by bob fitz

  1. B

    Solved Disable Red Cross Puzzle

    OK. My sincere thanks to everybody. I hadn't been expecting the resetting of variable values but Microns comments on this make sense. Moke123 "came good" with little gem that made it work as required cheekybuddha's explanation made me realize that I had an errant line of code from earlier...
  2. B

    Solved Disable Red Cross Puzzle

    I'm not sure about the logic being backwards but in the attached db, when using a boolean the variable gets reset but not when using an integer :unsure:
  3. B

    Solved Disable Red Cross Puzzle

    Thanks Moke. That does work :) Yes. That would seem to be the case. Do you know if that has always been the case? I don't remember that being the case many years ago.
  4. B

    Solved Disable Red Cross Puzzle

    Please forgive me if I'm just having a "Senior Moment". They seem to be getting more frequent with every passing day :rolleyes: Some years ago I found/copied/wrote some code to disable the use of the Red Cross in an app, forcing users to use a Quit button on a form. Naturally, I can't find...
  5. B

    Form_Unload Event

    Create a boolean variable. set its value when the correct Quit button is pressed. Check its value in the forms unload event
  6. B

    form filter via vba/macro

    Famous last words :LOL: ;)
  7. B

    Form Lock Before Status

    IMHO data validation is best done in the forms Before Update event. The record update can be cancelled in this event if the validation fails and a message can be given to the user. E.g. To validate the data in the Supervisor Combobox you might use something like: Not IsNull(Me.NameOfComboBox)...
  8. B

    form filter via vba/macro

    Try: Private Sub Kontrollkästchen21_AfterUpdate() Me!sf_qry_all.Form.Filter = "[Nächster Termin] <= #" & Date +30 & "#" Me!sf_qry_all.Form.FilterOn = True Me.Kombinationsfeld6 = Null End SubIf that doesn't work, tell me which form this is.
  9. B

    form filter via vba/macro

    Thank you for your kind words. Glad I was able to help. BTW if you have a problem in the future, it would be better to "look me up" rather than "hit me up" :ROFLMAO: :LOL::eek:
  10. B

    form filter via vba/macro

    Hi Georg Amended db attached. I have adjusted the code for the combo boxes. I have added a combo box that uses the Primary Key rather than a text value from the table which is the usual method. Of course, I had to add the Primary Key of table tbl_Gruppe to the query so that I could add it to...
  11. B

    form filter via vba/macro

    Yes, sfTabelle1 was the name I gave to sub form. The method used, with the combo called sfTabelle1two, is the one most commonly used. Sorry to hear that you've been unwell. I trust you're feeling a little better now :) Let see if we can get it working for you. Can you post a copy of the db...
  12. B

    In-table relations

    Noruen Maybe something like:
  13. B

    Solved Date Range Error

    It worked for me but try this: DoCmd.ApplyFilter task 'Me.Filter = task 'Me.FilterOn = True
  14. B

    Solved Date Range Error

    I've just noticed that you'll need to add Date_Due to the form's "Order By" setting
  15. B

    Solved Date Range Error

    Does this work for you
Top Bottom