How do I do step 3, add the Excel Macro Reference to

Jsoftware: JDLLServer Type Library?

And where is the J in your example? I can't see how entering 123 0 should be
expected to result in 123 1.21E+205.

Gratefully

Graham Parkhouse

----------------------------------------------

On Sat 19 Feb, David Mitchell wrote:

Here is an example:

1. I went to the bin install directory for J701 and ran this:

regsvr32 j.dll

2. I created this Excel macro:

     Sub Main()
         Dim jObject As New JDLLServerLib.JDLLServer
         Dim rObject As Variant

         Sheets("Sheet1").Select
         Range("A1").Select
         Status = jObject.DoR(("!" & Selection.Offset(0, 0).Value), rObject)
         Range("B1").Select
         Selection.Value = Str(rObject)
         jObject.Quit
     End Sub

3. I added the Excel Macro Reference to

Jsoftware: JDLLServer Type Library

4. I entered this into cells A1 and B1 in the Workbook Sheet1

123 0

5.  I ran the macro and got this in cells A1 and B1:

123 1.21E+205

----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to