Search results

The G.O.A.T.

What is this supposed to do?

Any code related to the list box besides the items selected? Bear in mind that a list boxes value can be set to anything in code, even values that are not in the list. If you're setting the value on load with .itemdata(0) I believe you get a dotted outline

So your basically using a fiscal year 4/1/2025 to 3/31/2026. Does each grant have a different start date?

Are you dealing with fiscal years? Function GetFiscalYear(Dt As Variant, Optional StartMonth As Integer = 7) As Variant If Not IsDate(Dt) Then Exit Function If Month(Dt) >= StartMonth Then GetFiscalYear = (Year(Dt) + 1) Else GetFiscalYear = Year(Dt) End If...

I think your missing the point to NOT use hyperlink datatype. If you must store the full path to a file then just store the path as text in a text field. You can then use vba to open the file as if it were a hyperlink. If you keep the files in folders in the same folder of the database you...

unfortunately you've used hyperlink datatype. see this link - https://codekabinett.com/rdumps.php?Lang=2&targetDoc=access-hyperlink-data-type It's much easier to use plain text to store a path and vba to follow it.

Here's an example i made for someone on another forum. It does not store the path to any files. when the database is opened it creates a folder named Clients in the same folder as the database. When you enter a new client and open the client form, it will create a folder for that client within...

A lot depends on how your file folders are set up and how your Pdf's are named. I tend to have one main folder with subfolders. The subfolders are named for each client and hold just the files related to that client. That way I don't have to store the path to any file or worry that any 2 files...

Might depend on how you broke them.

Dirty only happens when you Dirty the form (make an entry) try the current event with Me.OT_Hours = Null

DIr() or my function?

to get filename from Path: Function LastElement(StrIN As String, Optional Separator As String = "\") As String Dim var var = Split(StrIN, Separator) LastElement = var(UBound(var)) End Function

MDB version

I would assume you would want to open the file from the listbox also. You need a list box with a couple columns and set your column count and widths to hide the path. something like this

I think the path is C:\Users\ {Your User Name} \Pictures. You can get it with : Option Compare Database Option Explicit Declare Function Get_User_Name Lib "advapi32.dll" Alias _ "GetUserNameA" (ByVal lpBuffer As String, _ nSize As Long) As Long Function GetUserName() As String...

Another quick and easy reference https://www.techonthenet.com/access/functions/index.php

In case you missed it - https://www.access-programmers.co.uk/forums/threads/access-europe-user-group-wed-2-apr-class-modules-how-why-and-when-to-use-them-in-the-real-world-anders-ebro.333737/

Yes and the floor under the green moves around to give the green different contours.

Glad to see you've stuck with it. Have you seen the new TGL golf? It's like a mix of VR and real life.