Need help creating User-Defined Functions in Excel to query from a database

[Brandont05]

I work in an HR department that does not have any user defined functions(custom functions).

For example: I would like to be able to use an Employee# to pull their First Name from our database.
Example Function: =GetFirstName(Employee#)

I need help writing the VBA coding necessary to facilitate this function.

Function Name: GetFirstName
Database Name: c11e
Data Table: EMPLOYEE
Data Field: FIRST_NAME

I greatly appreciate any help.

 

[BiocideJ]

OK, the only thing you should need to change is the connection string

so this

 sConnString = "Provider=SQLOLEDB;Data Source=YOUR_SERVER_NAME_HERE;" & _
                  "Initial Catalog=c11e;" & _
                  "Integrated Security=SSPI;"

becomes something more like this

sConnString = "Provider=msdaora;Data Source=  (DESCRIPTION =(ADDRESS_LIST =(ADDRESS = (PROTOCOL = TCP)(HOST = YOUR.SERVER.IP.ADDRESS )(PORT = ####)))" & _
"(CONNECT_DATA =(SERVICE_NAME = c11e)));" & _
"User ID=yourusername;" & _
"Password=yourpassword"