Re: [MS_AccessPros] Re: Get return value from Excel user function in Access

 

Thanks Crystal,
Just download it and will be working with it this week.
Thanks again
Rod

---In MS_Access_Professionals@yahoogroups.com, <strive4peace2008@...> wrote :

Hi Rod,

I just uploaded a sample for you to look at in Files > Crystal

https://groups.yahoo.com/neo/groups/MS_Access_Professionals/files/Crystal/

Call_Excel_GetMyInformation_fromAccess.zip

the GetMyInformation function if defined in Excel and can, of course, return whatever you like (smile)
 
warm regards,
crystal

~ have an awesome day ~

On 5/22/2016 3:37 PM, desertscroller@... [MS_Access_Professionals] wrote:

Thanks Bill for the response.  That is good about getting the version of Excel.  I think I did not present my issue correctly.  I have added created a vba add-in for Excel that is used to make changes to the data Excel prior to importing the data into Access.  I establish a version/revision variable in the add-in plus a function to return the version information but not sure how to call the function in Access so the version information can be verified to ensure that the current version is being used.

Your response helps by verifying which version of Excel is being used.

Rod

---In MS_Access_Professionals@yahoogroups.com, <wrmosca@...> wrote :

I forgat to mention that doing it that way requires that you add the Excel library to your references. You probably should not do it that way. Use late binding like this:

Public Function ExcelVersion() As String

    Dim objXL As Object         'Excel.Application

    Dim strVersNum As String

    

    Set objXL = CreateObject("Excel.Application")

    strVersNum = objXL.Version

    ExcelVersion = strVersNum

    Set objXL = Nothing

    

    

End Function

-Bill

---In MS_Access_Professionals@yahoogroups.com, <wrmosca@...> wrote :

Rod

Here is a very simplified snippet that returns the Excel version number.

Public Function ExcelVersion() As String

    Dim objXL As Excel.Application

    Dim strVersNum As String

    

    Set objXL = CreateObject("Excel.Application")

    strVersNum = objXL.Version

    ExcelVersion = strVersNum

    

    Set objXL = Nothing

    

    

End Function

Regards,

Bill Mosca, Founder - MS_Access_Professionals

http://www.thatlldoit.com

Microsoft Office Access MVP

https://mvp.microsoft.com/en-us/PublicProfile/35852?fullName=Bill%20%20Mosca

My nothing-to-do-with-Access blog

http://wrmosca.wordpress.com

---In MS_Access_Professionals@yahoogroups.com, <desertscroller@...> wrote :

My application links a spreadsheet from Excel to Access (both 2010).  To get the data ready several user defined functions were created in Excel.  The issue is I would like to ensure that the user is using the current version of the add-in.  My idea is to create a Excel function to identify the current version.  Access would run the function and retrieve the version number and compare it to the latest released version.  I realize I will need to activate Excel with the add-in loaded to accomplish the data request.  Just not sure how to get the return value.

Any suggestions would be greatly appreciated.
Rod

 

__._,_.___

---

Posted by: desertscroller@cox.net

---

Reply via web post

•

Reply to sender

•

Reply to group

•

Start a New Topic

•

Messages in this topic (6)

---

Have you tried the highest rated email app?

With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.

---

Visit Your Group

• New Members 1

• Privacy • Unsubscribe • Terms of Use

.

__,_._,___