Search results

  1. ChrisO

    How can I tell what the calling event is?

    Bhavdahl. What precisely is it that you are trying to do? At runtime you can not determine the name of the calling procedure, not even the active procedure. You can pay for it but, as far as I know, not get it for free. Even passing the name of the calling procedure would not be sufficient...
  2. ChrisO

    DYNAMIC Short Cut Menu

    GUIDO22. The Shortcut Menu Bar in that demo is dynamic in as much as it is deleted and recreated on each call. You can see it in the code:- ' Delete the Shortcut Menu if it already exists. Application.CommandBars(CStr(!ShortcutName)).Delete ' Make a new Shortcut Menu by the same name. Set...
  3. ChrisO

    Table level validation

    I don’t wish to get off topic here but primary safety these days is most likely entrusted to a spring. There was a time when gravity was the primary safety but that had consequences which we do not need to go into here. Another method is to triplicate the safety circuit so that if any one of...
  4. ChrisO

    Table level validation

    Is not the original question a bit strange; who would accept an aircraft takeoff weight based on an Access database? Surely such a thing would be governed by some regulatory body or, at the very least, the aircraft manufacture. It’s a whole lot more complicated than just passengers verses...
  5. ChrisO

    Whats better new module new function or all functions in one module?

    Two unrelated ways of looking at it. 1. When you store a file on disk do you always create a new directory for it? 2. If your Functions are in separate Modules and you want one Function to call another then the called Function would need to be Public. Very often you will have one Public...
  6. ChrisO

    Is VBA a must?

    Apart from what has already been said I think learning VBA, or any programming language for that matter, is a good thing because it causes us to focus on the detail of the logic at hand. The very best thing to test our ability to think correctly is a computer language compiler because the...
  7. ChrisO

    Access permission on tabs.

    Attached is an Access97 demo which has been converted to Access2003. Depending on current user name the Tabs are either shown or removed. It’s a simulation which allows you to test the code. Normally it would set the Tabs just after login. There is also a Form for ‘Admin’ to configure who gets...
  8. ChrisO

    Trying to split a dashed number into multiple columns

    I think that if it is going to be called from a Query the code should at least be able to handle a Null being passed to it:- Public Function SplitValue(ByVal Value As Variant, _ ByVal Index As Long) As Variant If Len(Value) Then SplitValue = Split(Value...
  9. ChrisO

    Make Code Available to All Forms (Remove Duplication of code)

    Pat. That was not the point of my reply and I did say “Given the code and control names supplied…” The point was that Mark posted a class module solution and made the comment “. . . so not much code, and you simply can't do that with a standard module.” I was trying to show that it can be...
  10. ChrisO

    Date Conversion

    Nigel. From post #1 in this thread… >>A couple of the fields are date formats but the source data has them has dd.mm.yyyy<< And that is the specification as supplied by Andrew. Chris.
  11. ChrisO

    Date Conversion

    Nigel. This is what we know:- ---------- The source data is in the format of dd.mm.yyyy You have supplied a sample of 2.5.2013 That is the 2nd of May 2013 The double raw data for that date is 41396 The double raw data for that date does not change with regional settings. ---------- With a...
  12. ChrisO

    Make Code Available to All Forms (Remove Duplication of code)

    Given the code and control names supplied… In the On Change event in the property sheet for cboLocationID:- =HandleChange([cboManagerID]) And in a standard module:- Public Function HandleChange(ByRef cbo As ComboBox) cbo.Requery cbo = "" End Function The above works even if the...
  13. ChrisO

    Date Conversion

    Nigel. Try changing your regional settings to English (United States). You will find that 2.5.2013 is still converted to 2/5/2013. In the US, with a known date format of dd.mm.yyyy, 2.5.2013 should produce 5/2/2013. The reason for this is that Access only sees 2.5.2013 and not the intended...
  14. ChrisO

    Date Conversion

    Let’s wait and see if it works. :D Chris.
  15. ChrisO

    Date Conversion

    If the 'Dates' are really in the format of dd.mm.yyyy try:- Public Function ConvertToDate(ByVal vntIn As Variant) As Variant Dim vntTemp As Variant If Len(vntIn) Then vntTemp = Split(vntIn, ".") If UBound(vntTemp) = 2 Then On Error Resume Next...
  16. ChrisO

    Date Format: mm/dd/yyyy versus dd/mm/yyyy

    >>I'm happy with that formatting and that is how the dates are ultimately stored in the table.<< If that is correct then you are storing the ‘Date’ as Text and it should be a Date/Time or Double field data type. I can’t help with your problem because I don’t have Access 2013 and therefore don’t...
  17. ChrisO

    Disable Close Button

    Billgyrotech: For this particular topic, could you please confine your replies to this thread? http://www.access-programmers.co.uk/forums/showthread.php?t=250502 Chris.
  18. ChrisO

    Zoom Over Line Chart

    Zoom Over Line Chart. Rationale:- Line charts can have too much data displayed in them to the point that they become almost useless. With this demo we can drag, drop and resize a Zoom Box, over the main chart, to show the zoomed detail of the main chart in another detail chart. Note:- There...
  19. ChrisO

    Line numbers in the CODE window

    Mihail. >that nothing will be changed in this window< That is incorrect, some things are changed. Go to that site and copy/paste the contents back to the VB editor. As it stands, the Bytes code box is flawed, it is not perfect. And there is no point in trying to say that all we have to do is...
  20. ChrisO

    Negative Time values when export Access Query to Excel

    Maybe this will help:- http://support.microsoft.com/kb/182247 Chris.
Back
Top Bottom