Access VBa function
Budget: €8 – €30 EUR
fix this function for 5 euros
I have several tables that I want to display the data in reports and forms, for that I need a function
how
Display Public Function ( tablname As String, fieldname As String, fieldvalue As String) As String
Select data of table 1 and column 5 if ID = id
___________________________________________________
Public Function Grupp(table As String, field As String, awe As String) As String
Set db = CurrentDb
strwe = awe
strtab = table
strSQL = "SELECT CS_An FROM " & strtab & " WHERE " & strfield & " = awe
Set rs = db.OpenRecordset(strSQL)
Grupp = rs.Fields(0)
End Function
I have several tables that I want to display the data in reports and forms, for that I need a function
how
Display Public Function ( tablname As String, fieldname As String, fieldvalue As String) As String
Select data of table 1 and column 5 if ID = id
___________________________________________________
Public Function Grupp(table As String, field As String, awe As String) As String
Set db = CurrentDb
strwe = awe
strtab = table
strSQL = "SELECT CS_An FROM " & strtab & " WHERE " & strfield & " = awe
Set rs = db.OpenRecordset(strSQL)
Grupp = rs.Fields(0)
End Function