Public Function GetLevelIdentifier(PK As Long, Identifier As String) As String
If Identifier = "LO" Then
GetLevelIdentifier = DLookup("LocNo", "tblLocations", "LocID = " & PK)
End If
End Function
I assume that this should be
GetLevelIdentifier = DLookup("LOPath", "tblLocations"...