Juan,

Insert a code module into the Excel workbook, and define a Public Function with the proper parameters and enclose code provided previously inside this function and return the value.

Example:

Public Function Multiply(intA as Integer, intB as Integer) As Integer
    Set myMult = CreateObject("MyServer.MyClass")
    
    Multiply = myMult.Multiply(intA, intB)
    
    Set myMult = Nothing
End Function

You should then be able to enter into any cell in the workbook "=Multiply(5, 4)" and the result should calculate.

This function will also appear in the Function Dialog Box under the User Defined category.

Hope this helps!

Don


>Thanks anyway, but I wanted to see my COM Server Methods as functions under the Insert - Function Menu, Category: MyServer.MyClass.
>
>I compiled the COM project with VFP7, not VFP6, and it's working now, so I can create formulas in excel involving my VFP functions, for example:
>=Multiply(5,4)
>
>
>
>Thanks.
>
>
>
>>Juan,
>>
>>You can just use it in an Excel macro like so:
>>

Set myMult = CreateObject("MyServer.MyClass")
>>MsgBox " 5 times 4 is " & CStr(myMult.Multiply(5,4)), vbOKOnly + vbInformation, "Multiplication"

>>You can also add the VFP component to the VBA project's references to use it early-bound, but this is the simplest method.
>>
>>HTH,
>>
>>>Hi
>>>
>>>I have been reading VFP and Excel help system in order to add optional functions in excel but I can't get sucess at all. This is what I've done:
>>>
>>>1. I Created a Custom Olepublic class with an example Method to multiply numbers. I want further to seek and return values from VFP tables.
>>>
>>>2. In Excel, I went to Tools - Add-Ins - Automation and I selected MyServer.MyClass from the available servers list.
>>>
>>>3. But I get this error:
>>>Cannot find Add-in 'c:\comserver\myserver.exe /automation'. Delete from list ? YES/NO
>>>
>>>
>>>Any specific guidelines, white papers or books to build this VFP server ?
>>>
>>>How to implement help to be displayed when, in Excel, I click on Insert - Function - Category MyServer.MyClass ?
>>>
>>>
>>>
>>>
>>>Thanks
>>>
>>>Juan