├── .gitignore
├── ExPy
    ├── ExPy.py
    └── xlltypes.py
├── LICENSE
├── Makefile
├── README.md
├── cbits
    ├── Makefile
    ├── chutils.h
    ├── expy.c
    ├── xlcall.h
    └── xlcall32.lib
└── xls
    └── ExPyExamples.xlsx


/.gitignore:
--------------------------------------------------------------------------------
1 | /cbits/Makefile~
2 | /cbits/*.dll
3 | /cbits/*.o
4 | /cbits/expy.xll
5 | /Makefile~
6 | /*.zip
7 | 


--------------------------------------------------------------------------------
/ExPy/ExPy.py:
--------------------------------------------------------------------------------
  1 | # Copyright (c) Bojan Nikolic <bojan@bnikolic.co.uk> 2010, 2013
  2 | # License: See the LICENSE file distributed with this git repository
  3 | """
  4 | Registration of functions with Excel and their dispatch back into Python
  5 | """
  6 | 
  7 | import __main__
  8 | import types
  9 | import ctypes
 10 | import xlltypes
 11 | 
 12 | __version__ = "0.4"
 13 | 
 14 | # Holds ancillary data about all registred functions
 15 | fnregstry = {}
 16 | 
 17 | # This is the list of all results, used to prevent garbage collection
 18 | # of results passed back to Excel. This will eventually cause memory
 19 | # problems. See github issue #2
 20 | reslist = []
 21 | 
 22 | 
 23 | def nArgs(formula):
 24 |     """
 25 |     Number of arguments that an excel-available function takes
 26 |     """
 27 |     fname=formula[1:].split("(")[0]
 28 |     return (fnregstry[fname][0],)
 29 | 
 30 | def dispatch(formula,
 31 |              firstarg=None,
 32 |              restargs=None):
 33 |     """
 34 |     Dispatch an excel-available function to its Python implementation
 35 |     """
 36 |     fname=formula[1:].split("(")[0]
 37 |     arglist=[]
 38 |     if firstarg is not None:
 39 |         arglist.append(xlltypes.XLOper.from_address(firstarg))
 40 |     if restargs is not None:
 41 |         arglist.extend([xlltypes.XLOper.from_address(x) for x in restargs])
 42 |     try:
 43 |         res=getattr(__main__, fname)(*arglist)
 44 |     except BaseException, e:
 45 |         res=str(e)
 46 |     res=xlltypes.mkXLOper(res)
 47 |     if res:
 48 |         reslist.append(res)
 49 |         return (ctypes.addressof(res),)
 50 |     else:
 51 |         return (0,)
 52 | 
 53 | def register(fnname, nargs):
 54 |     """
 55 |     Register a function with excel
 56 |     """
 57 |     if type(fnname) == types.FunctionType:
 58 |         fnname=fnname.func_name
 59 |     r=RegisterFnXLL(str(getXLLDLL()),
 60 |                     "ExPyDispatch",
 61 |                     "P"+"P"*nargs+"#",
 62 |                     fnname)
 63 |     fnregstry[fnname]=(nargs,)
 64 |     return r    
 65 |     
 66 | 
 67 | def RegisterFnXLL(*fargs):
 68 |     """
 69 |     Register a function with Excel
 70 |     """
 71 |     args=(ctypes.POINTER(xlltypes.XLOper)*4)()
 72 |     xargs=[xlltypes.mkXLOper(x) for x in fargs]
 73 |     for i in range(4):
 74 |         args[i]=ctypes.POINTER(xlltypes.XLOper)(xargs[i])
 75 |     rr=xlltypes.XLOper()
 76 |     r=ctypes.windll.xlcall32.Excel4v(149, #This is xlfRegister
 77 |                                      ctypes.byref(rr),
 78 |                                      4,
 79 |                                      args)
 80 |     fnregstry[fargs[3]]=(len(fargs[2])-2,)
 81 |     return r
 82 | 
 83 | def mkEx4(n=0):
 84 |     p=ctypes.CFUNCTYPE(ctypes.c_int,
 85 |                        ctypes.c_int,
 86 |                        ctypes.POINTER(xlltypes.XLOper),
 87 |                        ctypes.c_int,
 88 |                        *([ctypes.POINTER(xlltypes.XLOper)]*n))
 89 |     return p(ctypes.windll.xlcall32.Excel4)
 90 | 
 91 | 
 92 | def getXLLDLL():
 93 |     rr=xlltypes.XLOper()
 94 |     fn=ctypes.windll.xlcall32.Excel4v
 95 |     r=fn(9|0x4000, #xlGetName
 96 |          ctypes.byref(rr),
 97 |          0,
 98 |          None)
 99 |     return rr
100 | 
101 | def xlStack():
102 |     rr=xlltypes.XLOper()
103 |     fn=ctypes.windll.xlcall32.Excel4v
104 |     r=fn(1|0x4000, #xlStack
105 |          ctypes.byref(rr),
106 |          0,
107 |          None)
108 |     return rr
109 | 
110 | 
111 | def Splash():
112 |     title="BN Algortihms Excel/Python add-in "
113 |     blurb= """
114 |     This is the ExPy Python add-in for Microsoft Excel 
115 | 
116 |     Version: %s
117 | 
118 |     Visit us at: http://www.bnikolic.co.uk/expy
119 |     Inquiries/bug reports to: webs@bnikolic.co.uk
120 | 
121 |     """% (__version__,)
122 |     lic="""
123 | Copyright (C) Copyright (c) Bojan Nikolic <bojan@bnikolic.co.uk> 2010, 2013, 2014
124 | 
125 | Redistribution and use in source and binary forms, with or without
126 | modification, are permitted provided that the following conditions are
127 | met:
128 | 
129 |     * Redistributions of source code must retain the above copyright
130 |        notice, this list of conditions and the following disclaimer.
131 | 
132 |     * Redistributions in binary form must reproduce the above
133 |        copyright notice, this list of conditions and the following
134 |        disclaimer in the documentation and/or other materials provided
135 |        with the distribution.
136 | 
137 |     * Neither the name of the ExPy Developers nor the names of any
138 |        contributors may be used to endorse or promote products derived
139 |        from this software without specific prior written permission.
140 | 
141 | THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
142 | "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
143 | LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
144 | A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
145 | OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
146 | SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
147 | LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
148 | DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
149 | THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
150 | (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
151 | OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
152 |     
153 |     """
154 |     ctypes.windll.user32.MessageBoxA(0,
155 |                                      blurb+lic, 
156 |                                      title, 
157 |                                      0x40)
158 | 


--------------------------------------------------------------------------------
/ExPy/xlltypes.py:
--------------------------------------------------------------------------------
  1 | # Copyright (c) Bojan Nikolic <bojan@bnikolic.co.uk> 2010, 2013
  2 | # License: See the LICENSE file distributed with this git repository
  3 | """
  4 | Definition of types for interaction with excel
  5 | """
  6 | 
  7 | import ctypes
  8 | import numpy
  9 | 
 10 | class XLRef(ctypes.Structure):
 11 |     _fields_=[("rwFirst", ctypes.c_int16),
 12 |               ("rwLast", ctypes.c_int16),
 13 |               ("colFirst", ctypes.c_int8),
 14 |               ("colLast", ctypes.c_int8)]
 15 | 
 16 | class XLOper(ctypes.Structure):
 17 | 
 18 |     def float(self):
 19 |         if self.xltype==xltypeNum:
 20 |             return self.val.double
 21 |         else:
 22 |             raise BaseException("XLOper is not of type double")
 23 | 
 24 |     def array(self):
 25 |         if self.xltype==xltypeMulti:
 26 |             r=[]
 27 |             for i in range(self.val.array.rows):
 28 |                 rr=[]
 29 |                 for j in range(self.val.array.columns):
 30 |                     rr.append(self.val.array.lparray[i*self.val.array.columns+j].float())
 31 |                 r.append(rr)
 32 |             return r
 33 |         else:
 34 |             raise BaseException("XLOper is not of array type")
 35 | 
 36 |     def __str__(self):
 37 |         if self.xltype==xltypeStr:
 38 |             slen=ord(self.val.xstr[0])
 39 |             return str(self.val.xstr[1:1+slen])
 40 |         if self.xltype==xltypeMulti:
 41 |             return "Array %iR X %iC" (self.val.array.rows,
 42 |                                       self.val.array.columns)
 43 |         else:
 44 |             return "No simple text representation"
 45 | 
 46 | class SRef(ctypes.Structure):
 47 |     """
 48 |     Single reference
 49 |     """
 50 |     _fields_=[("count", ctypes.c_int16),
 51 |               ("ref", XLRef)]
 52 | 
 53 | class XLMRef(ctypes.Structure):
 54 |     _fields_=[("count", ctypes.c_int16),
 55 |               ("reftbl", ctypes.POINTER(XLRef))]
 56 | 
 57 | class MRef(ctypes.Structure):
 58 |     """
 59 |     Multiple references
 60 |     """
 61 |     _fields_=[("lpmref", ctypes.POINTER(XLMRef)),
 62 |               ("idSheet", ctypes.c_int32)]
 63 | 
 64 | class Array(ctypes.Structure):
 65 |     _fields_=[("lparray",  ctypes.POINTER(XLOper)),
 66 |               ("rows", ctypes.c_int16),
 67 |               ("columns", ctypes.c_int16)]
 68 | 
 69 | 
 70 | class ValFlow(ctypes.Union):
 71 |     _fields_=[("level",  ctypes.c_int16),
 72 |               ("tbctrl",  ctypes.c_int16),
 73 |               ("idSheet", ctypes.c_int32),]
 74 | 
 75 | class Flow(ctypes.Structure):
 76 |     _fields_=[("valflow", ValFlow),
 77 |               ("rw", ctypes.c_int16),
 78 |               ("col", ctypes.c_int8),
 79 |               ("xlflow", ctypes.c_int8)]
 80 | 
 81 | 
 82 | class H(ctypes.Union):
 83 |     _fields_=[("lpbData", ctypes.POINTER(ctypes.c_int8)),
 84 |               ("hdata",  ctypes.c_void_p)]
 85 | 
 86 | class BigData(ctypes.Structure):
 87 |     _fields_=[("h", H),
 88 |               ("cbData",  ctypes.c_int32)]
 89 | 
 90 | class Val(ctypes.Union):
 91 |     _fields_=[("double", ctypes.c_double),
 92 |               ("xstr", ctypes.c_char_p),
 93 |               ("xbool", ctypes.c_int16),
 94 |               ("err",   ctypes.c_int16),
 95 |               ("xint",   ctypes.c_int8),
 96 |               ("sref",  SRef),
 97 |               ("mref",  MRef),
 98 |               ("array", Array),
 99 |               ("flow", Flow),
100 |               ("bigdata", BigData)]
101 | 
102 | XLOper._fields_=[("val", Val),
103 |                  ("xltype", ctypes.c_int16)]
104 | 
105 | 
106 | xltypeNum=0x0001
107 | xltypeStr=0x0002 
108 | xltypeBool=0x0004
109 | xltypeRef=0x0008
110 | xltypeErr=0x0010
111 | xltypeFlow=0x0020
112 | xltypeMulti=0x0040
113 | xltypeMissing=0x0080
114 | xltypeNil=0x0100
115 | xltypeSRef=0x0400
116 | xltypeInt=0x0800
117 | xlbitXLFree=0x1000
118 | xlbitDLLFree=0x4000
119 | xltypeBigData=  (xltypeStr | xltypeInt)    
120 |     
121 | 
122 | def fillXLOper(r, d):
123 |     """
124 |     Make an XLOper object
125 |     """
126 |     if type(d) == str:
127 |         if len(d)>255:
128 |             raise BaseException("Strings longer than 255 characters can not be passed into XLOPER")
129 |         r._s=ctypes.create_string_buffer(len(d)+1)
130 |         r._s[1:len(d)+1]=d[:]
131 |         r._s[0]=chr(len(d))
132 |         r.xltype=xltypeStr
133 |         r.val.xstr=ctypes.c_char_p(r._s.raw)
134 |     elif (type(d) == int) or (type(d) == float ) or type(d) == numpy.float64:
135 |         r.xltype=xltypeNum
136 |         r.val.double=float(d)
137 |     elif type(d)==numpy.ndarray:
138 |         nn=len(d.shape)
139 |         if nn==1:
140 |             nrows=d.shape[0]
141 |             ncolumns=1
142 |         elif len(d.shape)==2:
143 |             nrows,ncolumns=d.shape
144 |         else:
145 |             raise BaseException("Can't convert more than 2d array:" +str(d.shape))            
146 |         r.xltype=xltypeMulti
147 |         r.val.array.rows=nrows
148 |         r.val.array.columns=ncolumns
149 |         print "Got an array" , nrows, ncolumns
150 |         atype=XLOper*(nrows*ncolumns)
151 |         r.val.array.lparray=atype()
152 |         for i in range(nrows):
153 |             for j in range(ncolumns):
154 |                 if nn==1:
155 |                     fillXLOper(r.val.array.lparray[i*ncolumns+j], d[i])
156 |                 else:
157 |                     fillXLOper(r.val.array.lparray[i*ncolumns+j], d[i,j])
158 |     else:
159 |         raise BaseException("Don't know how to convert objects of type:" +str(type(d)))
160 |     return r
161 | 
162 | def mkXLOper(d):
163 |     """
164 |     Make an XLOper object
165 |     """
166 |     r=XLOper()
167 |     try:
168 |         fillXLOper(r, d)
169 |         return r
170 |     except BaseException, e:
171 |         print e
172 |         return None
173 |     
174 | 
175 |     
176 | 


--------------------------------------------------------------------------------
/LICENSE:
--------------------------------------------------------------------------------
 1 | Redistribution and use in source and binary forms, with or without
 2 | modification, are permitted provided that the following conditions are
 3 | met:
 4 | 
 5 |     * Redistributions of source code must retain the above copyright
 6 |        notice, this list of conditions and the following disclaimer.
 7 | 
 8 |     * Redistributions in binary form must reproduce the above
 9 |        copyright notice, this list of conditions and the following
10 |        disclaimer in the documentation and/or other materials provided
11 |        with the distribution.
12 | 
13 |     * Neither the name of the ExPy Developers nor the names of any
14 |        contributors may be used to endorse or promote products derived
15 |        from this software without specific prior written permission.
16 | 
17 | THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
18 | "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
19 | LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
20 | A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
21 | OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
22 | SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
23 | LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 | DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 | THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 | (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
27 | OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 | 


--------------------------------------------------------------------------------
/Makefile:
--------------------------------------------------------------------------------
 1 | # Copyright (c) Bojan Nikolic <bojan@bnikolic.co.uk> 2014
 2 | #
 3 | # License: BSD-3, see the LICENSE file distributed at the root of this
 4 | # git repository
 5 | # 
 6 | # Top-level makefile for ExPy
 7 | 
 8 | GITREV := $(shell git describe --dirty)
 9 | 
10 | PACK := ExPy-${GITREV}.zip
11 | 
12 | default: ${PACK}
13 | 
14 | PYFILES  := ExPy/ExPy.py ExPy/xlltypes.py
15 | XLLFILES := cbits/expy.xll
16 | 
17 | ${PACK}: ${XLLFILES} ${PYFILES}
18 | 	cd cbits && $(MAKE)
19 | 	rm -f $@
20 | 	zip $@ -j ${XLLFILES} ${PYFILES}
21 | 


--------------------------------------------------------------------------------
/README.md:
--------------------------------------------------------------------------------
 1 | ExPy
 2 | ====
 3 | 
 4 | In-process Python for use within Excel.
 5 | 
 6 | Currently tested against Python 2.7 and Excel 32bit. Works with, for
 7 | example, the Windows 32 bit Anaconda distribution.
 8 | 
 9 | BSD-3 type license, see LICENSE.
10 | 
11 | For more information see
12 | http://www.bnikolic.co.uk/expy/expy.html. Build of current latest
13 | version is available at: http://www.bnikolic.co.uk/soft/ExPy-0.4.zip
14 | 
15 | Inquiries to webs@bnikolic.co.uk
16 | 
17 | Description
18 | -----------
19 | 
20 | ExPy allows the use of Python in Excel by loading Python into the same
21 | process as excel and exposing function using the Excel Addin
22 | interface. This is a relatively high-performance and robust interface
23 | mechanism. ExcelDNA works in a similar way (providing interfacing to
24 | .Net languages) as well many other application-specific Excel addins.
25 | 
26 | Alternatives ways of interfacing are via COM (e.g., excelpython,
27 | https://github.com/ericremoreynolds/excelpython ) or client/server
28 | architectures (e.g., I believe xlloop).
29 | 
30 | Installation - Binaries
31 | -----------------------
32 | 
33 | Binaries only work against Python 2.7.x versions 32bit and Excel 32
34 | bit.
35 | 
36 | 1. Ensure you have installed Python version 2.7.x and it is in the
37 |    PATH environment variable. The recommended way of doing this is by
38 |    installing the Anaconda distribution: http://continuum.io/downloads
39 | 
40 | 2. Unpack the zip file
41 | 
42 | 3. Open the expy.xll file and confirm you want to give it privileges
43 |    to run
44 | 
45 | 
46 | 
47 | 
48 | 
49 | 
50 | 
51 | 
52 | 
53 | 
54 | 


--------------------------------------------------------------------------------
/cbits/Makefile:
--------------------------------------------------------------------------------
 1 | # Copyright (c) Bojan Nikolic <bojan@bnikolic.co.uk> 2014
 2 | #
 3 | # License: BSD-3, see the LICENSE file distributed at the root of this
 4 | # git repository
 5 | # 
 6 | # Quick makefile for the c parts of ExPy. Note: I build in Linux but
 7 | # using wine-hosted MinGW. YMMV. 
 8 | 
 9 | WINEP = ${HOME}/.wine-expy32
10 | WEXEC = WINEPREFIX=${WINEP}  wine
11 | 
12 | CC =  ${WEXEC} C:\\MinGW\\bin\\gcc.exe
13 | 
14 | CCFLAGS = -IC:\\Python27\\include
15 | 
16 | LDFLAGS = -mdll -Wl,--add-stdcall-alias 
17 | 
18 | CFILES = expy.c
19 | 
20 | default: expy.xll
21 | 
22 | clean:
23 | 	rm ${CFILES:.c=.o} expy.xll
24 | 
25 | %.o : %.c
26 | 	${CC} ${CCFLAGS} -c  $< -o $@
27 | 
28 | expy.xll : ${CFILES:.c=.o}
29 | 	${CC} ${LDFLAGS}    $<   -o $@ ${WINEP}/drive_c/windows/syswow64/python27.dll ./xlcall32.lib
30 | 
31 | 
32 | 


--------------------------------------------------------------------------------
/cbits/chutils.h:
--------------------------------------------------------------------------------
 1 | /* 
 2 | Code here comes from Chicken Scheme, git describe: 4.5.0rc1-2450-g627ea21
 3 | ;
 4 | ; Copyright (c) 2008-2014, The CHICKEN Team
 5 | ; Copyright (c) 2000-2007, Felix L. Winkelmann
 6 | ; All rights reserved.
 7 | ;
 8 | ; Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following
 9 | ; conditions are met:
10 | ;
11 | ;   Redistributions of source code must retain the above copyright notice, this list of conditions and the following
12 | ;     disclaimer.
13 | ;   Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following
14 | ;     disclaimer in the documentation and/or other materials provided with the distribution.
15 | ;   Neither the name of the author nor the names of its contributors may be used to endorse or promote
16 | ;     products derived from this software without specific prior written permission.
17 | ;
18 | ; THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS
19 | ; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
20 | ; AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
21 | ; CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
22 | ; CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
23 | ; SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 | ; THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
25 | ; OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 | ; POSSIBILITY OF SUCH DAMAGE.
27 | */
28 | #ifndef __EXPY_CHUTILS_H__
29 | #define __EXPY_CHUTILS_H__
30 | 
31 | /* These are wrappers around the following idiom:
32 |  *    assert(SOME_PRED(obj));
33 |  *    do_something_with(obj);
34 |  * This works around the fact obj may be an expression with side-effects.
35 |  *
36 |  * To make this work with nested expansions, we need semantics like
37 |  * (let ((x 1)) (let ((x x)) x)) => 1, but in C, int x = x; results in
38 |  * undefined behaviour because x refers to itself.  As a workaround,
39 |  * we keep around a reference to the previous level (one scope up).
40 |  * After initialisation, "previous" is redefined to mean "current".
41 |  */
42 | # define C_VAL1(x)                 C__PREV_TMPST.n1
43 | # define C_VAL2(x)                 C__PREV_TMPST.n2
44 | # define C__STR(x)                 #x
45 | # define C__CHECK_panic(a,s,f,l)                                       \
46 |   ((a) ? (void)0 :                                                     \
47 |    C_panic_hook("Low-level type assertion " s " failed at " f ":" C__STR(l)))
48 | # define C__CHECK_core(v,a,s,x)                                         \
49 |   ({ struct {                                                           \
50 |       typeof(v) n1;                                                     \
51 |   } C__TMPST = { .n1 = (v) };                                           \
52 |     typeof(C__TMPST) C__PREV_TMPST=C__TMPST;                            \
53 |     C__CHECK_panic(a,s,__FILE__,__LINE__);                              \
54 |     x; })
55 | # define C__CHECK2_core(v1,v2,a,s,x)                                    \
56 |   ({ struct {                                                           \
57 |       typeof(v1) n1;                                                    \
58 |       typeof(v2) n2;                                                    \
59 |   } C__TMPST = { .n1 = (v1), .n2 = (v2) };                              \
60 |     typeof(C__TMPST) C__PREV_TMPST=C__TMPST;                            \
61 |     C__CHECK_panic(a,s,__FILE__,__LINE__);                              \
62 |     x; })
63 | # define C_CHECK(v,a,x)            C__CHECK_core(v,a,#a,x)
64 | # define C_CHECK2(v1,v2,a,x)       C__CHECK2_core(v1,v2,a,#a,x)
65 | 
66 | #endif
67 | 


--------------------------------------------------------------------------------
/cbits/expy.c:
--------------------------------------------------------------------------------
  1 | /*
  2 |   Copyright (c) Bojan Nikolic <bojan@bnikolic.co.uk> 2010, 2013, 2014
  3 | 
  4 |   License: See the LICENSE file distributed with this git repository
  5 |   
  6 | */
  7 | 
  8 | #include "chutils.h"
  9 | 
 10 | #include <assert.h>
 11 | #include <windows.h>
 12 | #include <stdio.h>
 13 | #include <olectl.h>
 14 | 
 15 | #include <Python.h>
 16 | 
 17 | #include "xlcall.h"
 18 | 
 19 | __declspec(dllexport) __stdcall char * _ExPyEval(const char *cmd, int stoken);
 20 | // Add a path to the Python load path
 21 | void addToPath(char *s);
 22 | 
 23 | void msgBox(const char *msg)
 24 | {
 25 | 	MessageBox(GetFocus(), 
 26 | 		   msg, 
 27 | 		   NULL, 
 28 | 		   MB_OK | MB_ICONSTOP);
 29 | }
 30 | 
 31 | void (*C_panic_hook) (const char *msg) = msgBox;
 32 | 
 33 | #define EXPY_NFUNC 2
 34 | 
 35 | static char* expy_funcs[EXPY_NFUNC][7] = {
 36 |   {"ExPyEvalSS",  "CC#",    "ExPyEvalSS"},
 37 |   {"ExPyScript",  "CC#",    "ExPyScript"}
 38 | };
 39 | 
 40 | XLOPER* new_xlstring(const char* text)
 41 | {
 42 |     size_t len;
 43 | 
 44 |     if(!text || 
 45 |        !(len = strlen(text)))
 46 |        return NULL;
 47 | 
 48 |     XLOPER* x = (XLOPER *)malloc(sizeof(XLOPER) + len + 2);
 49 |     if (!x) 
 50 |       return 0;
 51 |     char* p = (char*)(((char*) x) + sizeof(XLOPER));
 52 |     memcpy(p + 1, text, len + 1);
 53 |     p[0] = (BYTE)len;
 54 |     x->xltype = xltypeStr;
 55 |     x->val.str = p;
 56 |     return x;
 57 | }
 58 | 
 59 | char * xl2str(const XLOPER *xl)
 60 | {
 61 |   const char *xlstr=  C_CHECK(xl, xl->xltype==xltypeStr, C_VAL1(xl)->val.str);
 62 |   char *res=malloc(sizeof(char) * xlstr[0]);
 63 |   if (res)
 64 |     memcpy(res, xlstr+1, xlstr[0]);
 65 |   return res;
 66 | }
 67 | 
 68 | __declspec(dllexport) int __stdcall xlAutoOpen(void)
 69 | {
 70 | 
 71 |   //check_init();
 72 |   static XLOPER   xDLL;
 73 |   int i;
 74 | 
 75 |   Excel4(xlGetName, &xDLL, 0);
 76 | 
 77 |   char *dllName=xl2str(&xDLL);
 78 |   HMODULE dllh=GetModuleHandle(dllName);
 79 | 
 80 | 
 81 |   static XLOPER xRegister;
 82 |   xRegister.xltype = xltypeStr;
 83 |   
 84 |   for (i=0; i<EXPY_NFUNC; ++i)
 85 |   {
 86 |             XLOPER* fn = new_xlstring(expy_funcs[i][0]);
 87 |             XLOPER* ret = new_xlstring(expy_funcs[i][1]);
 88 |             XLOPER* alias = new_xlstring(expy_funcs[i][2]);
 89 |             BOOL success = Excel4(xlfRegister, 0, 4, &xDLL, fn, ret, alias) == xlretSuccess;
 90 | 	    if (!success)
 91 | 	      msgBox("Failed to register function");
 92 |             free(fn); free(ret); free(alias);
 93 |   }
 94 | 
 95 |     /* Free the XLL filename */
 96 |     Excel4(xlFree, 0, 1, &xDLL);
 97 | 
 98 |     Py_Initialize();
 99 | 
100 |     /* Add path of the Dll to Pythons sys.path */
101 |     addToPath(dllName);
102 | 
103 |     /* Load ExPy */
104 |     _ExPyEval("import ExPy;", 256);
105 | 
106 |     free(dllName);
107 | 
108 |     return 1;
109 | 
110 | }
111 | 
112 | void addToPath(char *s)
113 | {
114 |   PyObject *mo = PyImport_ImportModule("os.path");
115 |   PyObject *fd = PyObject_GetAttrString(mo, "dirname");
116 |   
117 |   PyObject *ss= PyObject_CallFunction(fd, "s", s);
118 | 
119 |   PyObject *ms = PyImport_ImportModule("sys");
120 |   PyObject *sp = PyObject_GetAttrString(ms, "path");
121 |   PyList_Append(C_CHECK( sp, PyList_Check(C_VAL1(sp)), C_VAL1(sp)),
122 | 		ss);
123 | }
124 | 
125 | __declspec(dllexport) __stdcall char * _ExPyEval(const char *cmd, int stoken)
126 | {
127 | 
128 |   PyGILState_STATE state;
129 |   PyObject *m=NULL, *d=NULL;
130 |   //check_init();
131 |   state = PyGILState_Ensure();
132 | 
133 |   m = PyImport_ImportModule("__main__");
134 | 
135 |   if (m) d = PyModule_GetDict(m);
136 | 
137 |   if (d) {
138 |     PyObject *res = PyRun_String(cmd, 
139 | 				 stoken,
140 | 				 d, d);
141 |     if (! res)
142 |     {
143 |       PyErr_Print();
144 |     }
145 |     char *rres=PyString_AsString(PyObject_Str(res));
146 |     /* Note that the count of the PyObject_Str object is not
147 |        decremented here*/
148 |     Py_XDECREF(res);
149 |     Py_XDECREF(m);
150 |     return rres;
151 |   } 
152 |   else 
153 |   {
154 |     msgBox("Could not import __main__");
155 |   }
156 |   return NULL;
157 | 
158 | }
159 | 
160 | __declspec(dllexport) __stdcall char * ExPyScript(const char *cmd)
161 | {
162 |   return _ExPyEval(cmd, 256);
163 | }
164 | 
165 | __declspec(dllexport) __stdcall char * ExPyEvalSS(const char *cmd)
166 | {
167 |   return _ExPyEval(cmd, 258);
168 | }
169 | 
170 | /**
171 |  */
172 | 
173 | __declspec(dllexport) __stdcall LPXLOPER ExPyDispatch(LPXLOPER p1,
174 | 						      ...)
175 | {
176 | 
177 |   XLOPER xCaller;
178 |   int status;
179 |   char formula[256];
180 | 
181 |   status=Excel4(xlfCaller,
182 | 		&xCaller,
183 | 		0); 
184 |   XLOPER xCell;
185 |   if ( xCaller.xltype == xltypeSRef ||   xCaller.xltype == xltypeRef )
186 |   {
187 |       status=Excel4(xlfGetFormula,
188 | 		  &xCell,
189 | 		  1,
190 | 		  &xCaller ); 
191 |       size_t len=xCell.val.str[0];
192 |       memcpy(formula, 
193 | 	     xCell.val.str+1, 
194 | 	     len);
195 |       formula[len]=0;
196 |   }
197 |   else
198 |   {
199 |     msgBox("This function can only be called from the spreadsheet");
200 |     return NULL;
201 |   }
202 |   
203 | 
204 |   PyObject *m = PyImport_ImportModule("ExPy");
205 | 
206 |   PyObject *PyNArgs = PyObject_GetAttrString(m, "nArgs");
207 |   PyObject *PyNArgsRes = PyObject_CallFunction(PyNArgs, "s", formula);
208 |   int nargs;
209 |   if (PyArg_ParseTuple(PyNArgsRes, "i", &nargs))
210 |   {
211 |     // do nothing
212 |   }
213 |   else
214 |   {
215 |     printf("Could not convert");
216 |   }
217 | 
218 |   PyObject * dispArgs=NULL;
219 |   if (nargs>1)
220 |   {
221 |     char fmt[nargs];
222 |     size_t i;
223 |     for(i=0; i<nargs-1; ++i)
224 |       fmt[i]='i';
225 |     fmt[nargs-1]=0;
226 |     va_list vl;
227 |     va_start(vl, p1);
228 |     dispArgs=Py_VaBuildValue(fmt, vl);
229 |     if (dispArgs==NULL)
230 |     {
231 |       PyErr_Print();
232 |     }
233 |   }
234 | 
235 |   PyObject *PyDispatch = PyObject_GetAttrString(m, "dispatch");
236 |   if (PyDispatch==NULL)
237 |   {
238 |     PyErr_Print();
239 |     return NULL;
240 |   }
241 |   PyObject *PyDispRes;
242 |   if (nargs==0)
243 |   {
244 |     PyDispRes  = PyObject_CallFunction(PyDispatch, "s", formula);
245 |   }
246 |   else if (nargs==1)
247 |   {
248 |     PyDispRes  = PyObject_CallFunction(PyDispatch, "si", formula, p1);
249 |   }
250 |   else
251 |   {
252 |     PyDispRes  = PyObject_CallFunction(PyDispatch, "siO", formula, p1, dispArgs);
253 |   }
254 | 
255 |   if (PyDispRes==NULL)
256 |   {
257 |     PyErr_Print();
258 |   }
259 | 
260 |   LPXLOPER res;
261 |   if (PyArg_ParseTuple(PyDispRes, "i", &res))
262 |   {
263 |     // do nothing
264 |   }
265 |   else
266 |   {
267 |     PyErr_Print();
268 |   }
269 | 
270 |   Py_XDECREF(m);
271 |   Py_XDECREF(PyNArgs);
272 |   if (dispArgs)
273 |   {
274 |     Py_XDECREF(dispArgs);
275 |   }
276 |   Py_XDECREF(PyDispatch);
277 |   Py_XDECREF(PyDispRes);
278 | 
279 |   return res;
280 | 
281 | }
282 | 
283 | 
284 | 


--------------------------------------------------------------------------------
/cbits/xlcall.h:
--------------------------------------------------------------------------------
  1 | /*
  2 |  * ISDA CDS Standard Model
  3 |  *
  4 |  * Copyright (C) 2009 International Swaps and Derivatives Association, Inc.
  5 |  * Developed and supported in collaboration with Markit
  6 |  * 
  7 |  * This program is free software: you can redistribute it and/or modify it
  8 |  * under the terms of the ISDA CDS Standard Model Public License.
  9 |  */
 10 | 
 11 | #ifdef __cplusplus
 12 | extern "C" {
 13 | #endif    /* __cplusplus */
 14 | 
 15 | /*
 16 | ** XLREF structure 
 17 | **
 18 | ** Describes a single rectangular reference
 19 | */
 20 | 
 21 | typedef struct xlref 
 22 | {
 23 |     WORD rwFirst;
 24 |     WORD rwLast;
 25 |     BYTE colFirst;
 26 |     BYTE colLast;
 27 | } XLREF, FAR *LPXLREF;
 28 | 
 29 | 
 30 | /*
 31 | ** XLMREF structure
 32 | **
 33 | ** Describes multiple rectangular references.
 34 | ** This is a variable size structure, default 
 35 | ** size is 1 reference.
 36 | */
 37 | 
 38 | typedef struct xlmref 
 39 | {
 40 |     WORD count;
 41 |     XLREF reftbl[1];                        /* actually reftbl[count] */
 42 | } XLMREF, FAR *LPXLMREF;
 43 | 
 44 | 
 45 | /*
 46 | ** XLOPER structure 
 47 | **
 48 | ** Excel's fundamental data type: can hold data
 49 | ** of any type. Use "R" as the argument type in the 
 50 | ** REGISTER function.
 51 | **/
 52 | 
 53 | typedef struct xloper 
 54 | {
 55 |     union 
 56 |     {
 57 |         double num;                     /* xltypeNum */
 58 |         LPSTR str;                      /* xltypeStr */
 59 |         WORD boolean;                   /* xltypeBool */
 60 |         WORD err;                       /* xltypeErr */
 61 |         short int w;                    /* xltypeInt */
 62 |         struct 
 63 |         {
 64 |             WORD count;                 /* always = 1 */
 65 |             XLREF ref;
 66 |         } sref;                         /* xltypeSRef */
 67 |         struct 
 68 |         {
 69 |             XLMREF far *lpmref;
 70 |             DWORD idSheet;
 71 |         } mref;                         /* xltypeRef */
 72 |         struct 
 73 |         {
 74 |             struct xloper far *lparray;
 75 |             WORD rows;
 76 |             WORD columns;
 77 |         } array;                        /* xltypeMulti */
 78 |         struct 
 79 |         {
 80 |             union
 81 |             {
 82 |                 short int level;        /* xlflowRestart */
 83 |                 short int tbctrl;       /* xlflowPause */
 84 |                 DWORD idSheet;          /* xlflowGoto */
 85 |             } valflow;
 86 |             WORD rw;                    /* xlflowGoto */
 87 |             BYTE col;                   /* xlflowGoto */
 88 |             BYTE xlflow;
 89 |         } flow;                         /* xltypeFlow */
 90 |         struct
 91 |         {
 92 |             union
 93 |             {
 94 |                 BYTE far *lpbData;      /* data passed to XL */
 95 |                 HANDLE hdata;           /* data returned from XL */
 96 |             } h;
 97 |             long cbData;
 98 |         } bigdata;                      /* xltypeBigData */
 99 |     } val;
100 |     WORD xltype;
101 | } XLOPER, FAR *LPXLOPER;
102 | 
103 | 
104 | /*
105 | ** XLOPER data types
106 | **
107 | ** Used for xltype field of XLOPER structure
108 | */
109 | 
110 | #define xltypeNum        0x0001
111 | #define xltypeStr        0x0002
112 | #define xltypeBool       0x0004
113 | #define xltypeRef        0x0008
114 | #define xltypeErr        0x0010
115 | #define xltypeFlow       0x0020
116 | #define xltypeMulti      0x0040
117 | #define xltypeMissing    0x0080
118 | #define xltypeNil        0x0100
119 | #define xltypeSRef       0x0400
120 | #define xltypeInt        0x0800
121 | #define xlbitXLFree      0x1000
122 | #define xlbitDLLFree     0x4000
123 | 
124 | #define xltypeBigData    (xltypeStr | xltypeInt)
125 | 
126 | 
127 | /*
128 | ** Error codes
129 | **
130 | ** Used for val.err field of XLOPER structure
131 | ** when constructing error XLOPERs
132 | */
133 | 
134 | #define xlerrNull    0
135 | #define xlerrDiv0    7
136 | #define xlerrValue   15
137 | #define xlerrRef     23
138 | #define xlerrName    29
139 | #define xlerrNum     36
140 | #define xlerrNA      42
141 | 
142 | 
143 | /* 
144 | ** Flow data types
145 | **
146 | ** Used for val.flow.xlflow field of XLOPER structure
147 | ** when constructing flow-control XLOPERs
148 | **/
149 | 
150 | #define xlflowHalt       1
151 | #define xlflowGoto       2
152 | #define xlflowRestart    8
153 | #define xlflowPause      16
154 | #define xlflowResume     64
155 | 
156 | 
157 | /*
158 | ** Function prototypes
159 | */
160 | 
161 | int far _cdecl Excel4(int xlfn, LPXLOPER operRes, int count,... ); 
162 | /* followed by count LPXLOPERs */
163 | 
164 | int far pascal Excel4v(int xlfn, LPXLOPER operRes, int count, LPXLOPER far opers[]);
165 | int far pascal XLCallVer(void);
166 | 
167 | 
168 | /*
169 | ** Return codes
170 | **
171 | ** These values can be returned from Excel4() or Excel4v().
172 | */
173 | 
174 | #define xlretSuccess    0     /* success */ 
175 | #define xlretAbort      1     /* macro halted */
176 | #define xlretInvXlfn    2     /* invalid function number */ 
177 | #define xlretInvCount   4     /* invalid number of arguments */ 
178 | #define xlretInvXloper  8     /* invalid OPER structure */  
179 | #define xlretStackOvfl  16    /* stack overflow */  
180 | #define xlretFailed     32    /* command failed */  
181 | #define xlretUncalced   64    /* uncalced cell */
182 | 
183 | 
184 | /*
185 | ** Function number bits
186 | */ 
187 | 
188 | #define xlCommand    0x8000
189 | #define xlSpecial    0x4000
190 | #define xlIntl       0x2000
191 | #define xlPrompt     0x1000
192 | 
193 | 
194 | /*
195 | ** Auxiliary function numbers
196 | **
197 | ** These functions are available only from the C API,
198 | ** not from the Excel macro language.
199 | */
200 | 
201 | #define xlFree             (0  | xlSpecial)
202 | #define xlStack            (1  | xlSpecial)
203 | #define xlCoerce           (2  | xlSpecial)
204 | #define xlSet              (3  | xlSpecial)
205 | #define xlSheetId          (4  | xlSpecial)
206 | #define xlSheetNm          (5  | xlSpecial)
207 | #define xlAbort            (6  | xlSpecial)
208 | #define xlGetInst          (7  | xlSpecial)
209 | #define xlGetHwnd          (8  | xlSpecial)
210 | #define xlGetName          (9  | xlSpecial)
211 | #define xlEnableXLMsgs     (10 | xlSpecial)
212 | #define xlDisableXLMsgs    (11 | xlSpecial)
213 | #define xlDefineBinaryName (12 | xlSpecial)
214 | #define xlGetBinaryName    (13 | xlSpecial)
215 | 
216 | 
217 | /* 
218 | ** User defined function
219 | **
220 | ** First argument should be a function reference.
221 | */
222 | 
223 | #define xlUDF      255
224 | 
225 | 
226 | /*
227 | ** Built-in Functions and Command Equivalents
228 | */
229 | 
230 | 
231 | /* Excel function numbers */
232 | #define xlfCount 0
233 | #define xlfIsna 2
234 | #define xlfIserror 3
235 | #define xlfSum 4
236 | #define xlfAverage 5
237 | #define xlfMin 6
238 | #define xlfMax 7
239 | #define xlfRow 8
240 | #define xlfColumn 9
241 | #define xlfNa 10
242 | #define xlfNpv 11
243 | #define xlfStdev 12
244 | #define xlfDollar 13
245 | #define xlfFixed 14
246 | #define xlfSin 15
247 | #define xlfCos 16
248 | #define xlfTan 17
249 | #define xlfAtan 18
250 | #define xlfPi 19
251 | #define xlfSqrt 20
252 | #define xlfExp 21
253 | #define xlfLn 22
254 | #define xlfLog10 23
255 | #define xlfAbs 24
256 | #define xlfInt 25
257 | #define xlfSign 26
258 | #define xlfRound 27
259 | #define xlfLookup 28
260 | #define xlfIndex 29
261 | #define xlfRept 30
262 | #define xlfMid 31
263 | #define xlfLen 32
264 | #define xlfValue 33
265 | #define xlfTrue 34
266 | #define xlfFalse 35
267 | #define xlfAnd 36
268 | #define xlfOr 37
269 | #define xlfNot 38
270 | #define xlfMod 39
271 | #define xlfDcount 40
272 | #define xlfDsum 41
273 | #define xlfDaverage 42
274 | #define xlfDmin 43
275 | #define xlfDmax 44
276 | #define xlfDstdev 45
277 | #define xlfVar 46
278 | #define xlfDvar 47
279 | #define xlfText 48
280 | #define xlfLinest 49
281 | #define xlfTrend 50
282 | #define xlfLogest 51
283 | #define xlfGrowth 52
284 | #define xlfGoto 53
285 | #define xlfHalt 54
286 | #define xlfPv 56
287 | #define xlfFv 57
288 | #define xlfNper 58
289 | #define xlfPmt 59
290 | #define xlfRate 60
291 | #define xlfMirr 61
292 | #define xlfIrr 62
293 | #define xlfRand 63
294 | #define xlfMatch 64
295 | #define xlfDate 65
296 | #define xlfTime 66
297 | #define xlfDay 67
298 | #define xlfMonth 68
299 | #define xlfYear 69
300 | #define xlfWeekday 70
301 | #define xlfHour 71
302 | #define xlfMinute 72
303 | #define xlfSecond 73
304 | #define xlfNow 74
305 | #define xlfAreas 75
306 | #define xlfRows 76
307 | #define xlfColumns 77
308 | #define xlfOffset 78
309 | #define xlfAbsref 79
310 | #define xlfRelref 80
311 | #define xlfArgument 81
312 | #define xlfSearch 82
313 | #define xlfTranspose 83
314 | #define xlfError 84
315 | #define xlfStep 85
316 | #define xlfType 86
317 | #define xlfEcho 87
318 | #define xlfSetName 88
319 | #define xlfCaller 89
320 | #define xlfDeref 90
321 | #define xlfWindows 91
322 | #define xlfSeries 92
323 | #define xlfDocuments 93
324 | #define xlfActiveCell 94
325 | #define xlfSelection 95
326 | #define xlfResult 96
327 | #define xlfAtan2 97
328 | #define xlfAsin 98
329 | #define xlfAcos 99
330 | #define xlfChoose 100
331 | #define xlfHlookup 101
332 | #define xlfVlookup 102
333 | #define xlfLinks 103
334 | #define xlfInput 104
335 | #define xlfIsref 105
336 | #define xlfGetFormula 106
337 | #define xlfGetName 107
338 | #define xlfSetValue 108
339 | #define xlfLog 109
340 | #define xlfExec 110
341 | #define xlfChar 111
342 | #define xlfLower 112
343 | #define xlfUpper 113
344 | #define xlfProper 114
345 | #define xlfLeft 115
346 | #define xlfRight 116
347 | #define xlfExact 117
348 | #define xlfTrim 118
349 | #define xlfReplace 119
350 | #define xlfSubstitute 120
351 | #define xlfCode 121
352 | #define xlfNames 122
353 | #define xlfDirectory 123
354 | #define xlfFind 124
355 | #define xlfCell 125
356 | #define xlfIserr 126
357 | #define xlfIstext 127
358 | #define xlfIsnumber 128
359 | #define xlfIsblank 129
360 | #define xlfT 130
361 | #define xlfN 131
362 | #define xlfFopen 132
363 | #define xlfFclose 133
364 | #define xlfFsize 134
365 | #define xlfFreadln 135
366 | #define xlfFread 136
367 | #define xlfFwriteln 137
368 | #define xlfFwrite 138
369 | #define xlfFpos 139
370 | #define xlfDatevalue 140
371 | #define xlfTimevalue 141
372 | #define xlfSln 142
373 | #define xlfSyd 143
374 | #define xlfDdb 144
375 | #define xlfGetDef 145
376 | #define xlfReftext 146
377 | #define xlfTextref 147
378 | #define xlfIndirect 148
379 | #define xlfRegister 149
380 | #define xlfCall 150
381 | #define xlfAddBar 151
382 | #define xlfAddMenu 152
383 | #define xlfAddCommand 153
384 | #define xlfEnableCommand 154
385 | #define xlfCheckCommand 155
386 | #define xlfRenameCommand 156
387 | #define xlfShowBar 157
388 | #define xlfDeleteMenu 158
389 | #define xlfDeleteCommand 159
390 | #define xlfGetChartItem 160
391 | #define xlfDialogBox 161
392 | #define xlfClean 162
393 | #define xlfMdeterm 163
394 | #define xlfMinverse 164
395 | #define xlfMmult 165
396 | #define xlfFiles 166
397 | #define xlfIpmt 167
398 | #define xlfPpmt 168
399 | #define xlfCounta 169
400 | #define xlfCancelKey 170
401 | #define xlfInitiate 175
402 | #define xlfRequest 176
403 | #define xlfPoke 177
404 | #define xlfExecute 178
405 | #define xlfTerminate 179
406 | #define xlfRestart 180
407 | #define xlfHelp 181
408 | #define xlfGetBar 182
409 | #define xlfProduct 183
410 | #define xlfFact 184
411 | #define xlfGetCell 185
412 | #define xlfGetWorkspace 186
413 | #define xlfGetWindow 187
414 | #define xlfGetDocument 188
415 | #define xlfDproduct 189
416 | #define xlfIsnontext 190
417 | #define xlfGetNote 191
418 | #define xlfNote 192
419 | #define xlfStdevp 193
420 | #define xlfVarp 194
421 | #define xlfDstdevp 195
422 | #define xlfDvarp 196
423 | #define xlfTrunc 197
424 | #define xlfIslogical 198
425 | #define xlfDcounta 199
426 | #define xlfDeleteBar 200
427 | #define xlfUnregister 201
428 | #define xlfUsdollar 204
429 | #define xlfFindb 205
430 | #define xlfSearchb 206
431 | #define xlfReplaceb 207
432 | #define xlfLeftb 208
433 | #define xlfRightb 209
434 | #define xlfMidb 210
435 | #define xlfLenb 211
436 | #define xlfRoundup 212
437 | #define xlfRounddown 213
438 | #define xlfAsc 214
439 | #define xlfDbcs 215
440 | #define xlfRank 216
441 | #define xlfAddress 219
442 | #define xlfDays360 220
443 | #define xlfToday 221
444 | #define xlfVdb 222
445 | #define xlfMedian 227
446 | #define xlfSumproduct 228
447 | #define xlfSinh 229
448 | #define xlfCosh 230
449 | #define xlfTanh 231
450 | #define xlfAsinh 232
451 | #define xlfAcosh 233
452 | #define xlfAtanh 234
453 | #define xlfDget 235
454 | #define xlfCreateObject 236
455 | #define xlfVolatile 237
456 | #define xlfLastError 238
457 | #define xlfCustomUndo 239
458 | #define xlfCustomRepeat 240
459 | #define xlfFormulaConvert 241
460 | #define xlfGetLinkInfo 242
461 | #define xlfTextBox 243
462 | #define xlfInfo 244
463 | #define xlfGroup 245
464 | #define xlfGetObject 246
465 | #define xlfDb 247
466 | #define xlfPause 248
467 | #define xlfResume 251
468 | #define xlfFrequency 252
469 | #define xlfAddToolbar 253
470 | #define xlfDeleteToolbar 254
471 | #define xlfResetToolbar 256
472 | #define xlfEvaluate 257
473 | #define xlfGetToolbar 258
474 | #define xlfGetTool 259
475 | #define xlfSpellingCheck 260
476 | #define xlfErrorType 261
477 | #define xlfAppTitle 262
478 | #define xlfWindowTitle 263
479 | #define xlfSaveToolbar 264
480 | #define xlfEnableTool 265
481 | #define xlfPressTool 266
482 | #define xlfRegisterId 267
483 | #define xlfGetWorkbook 268
484 | #define xlfAvedev 269
485 | #define xlfBetadist 270
486 | #define xlfGammaln 271
487 | #define xlfBetainv 272
488 | #define xlfBinomdist 273
489 | #define xlfChidist 274
490 | #define xlfChiinv 275
491 | #define xlfCombin 276
492 | #define xlfConfidence 277
493 | #define xlfCritbinom 278
494 | #define xlfEven 279
495 | #define xlfExpondist 280
496 | #define xlfFdist 281
497 | #define xlfFinv 282
498 | #define xlfFisher 283
499 | #define xlfFisherinv 284
500 | #define xlfFloor 285
501 | #define xlfGammadist 286
502 | #define xlfGammainv 287
503 | #define xlfCeiling 288
504 | #define xlfHypgeomdist 289
505 | #define xlfLognormdist 290
506 | #define xlfLoginv 291
507 | #define xlfNegbinomdist 292
508 | #define xlfNormdist 293
509 | #define xlfNormsdist 294
510 | #define xlfNorminv 295
511 | #define xlfNormsinv 296
512 | #define xlfStandardize 297
513 | #define xlfOdd 298
514 | #define xlfPermut 299
515 | #define xlfPoisson 300
516 | #define xlfTdist 301
517 | #define xlfWeibull 302
518 | #define xlfSumxmy2 303
519 | #define xlfSumx2my2 304
520 | #define xlfSumx2py2 305
521 | #define xlfChitest 306
522 | #define xlfCorrel 307
523 | #define xlfCovar 308
524 | #define xlfForecast 309
525 | #define xlfFtest 310
526 | #define xlfIntercept 311
527 | #define xlfPearson 312
528 | #define xlfRsq 313
529 | #define xlfSteyx 314
530 | #define xlfSlope 315
531 | #define xlfTtest 316
532 | #define xlfProb 317
533 | #define xlfDevsq 318
534 | #define xlfGeomean 319
535 | #define xlfHarmean 320
536 | #define xlfSumsq 321
537 | #define xlfKurt 322
538 | #define xlfSkew 323
539 | #define xlfZtest 324
540 | #define xlfLarge 325
541 | #define xlfSmall 326
542 | #define xlfQuartile 327
543 | #define xlfPercentile 328
544 | #define xlfPercentrank 329
545 | #define xlfMode 330
546 | #define xlfTrimmean 331
547 | #define xlfTinv 332
548 | #define xlfMovieCommand 334
549 | #define xlfGetMovie 335
550 | #define xlfConcatenate 336
551 | #define xlfPower 337
552 | #define xlfPivotAddData 338
553 | #define xlfGetPivotTable 339
554 | #define xlfGetPivotField 340
555 | #define xlfGetPivotItem 341
556 | #define xlfRadians 342
557 | #define xlfDegrees 343
558 | #define xlfSubtotal 344
559 | #define xlfSumif 345
560 | #define xlfCountif 346
561 | #define xlfCountblank 347
562 | #define xlfScenarioGet 348
563 | #define xlfOptionsListsGet 349
564 | #define xlfIspmt 350
565 | #define xlfDatedif 351
566 | #define xlfDatestring 352
567 | #define xlfNumberstring 353
568 | #define xlfRoman 354
569 | #define xlfOpenDialog 355
570 | #define xlfSaveDialog 356
571 | 
572 | /* Excel command numbers */
573 | #define xlcBeep (0 | xlCommand)
574 | #define xlcOpen (1 | xlCommand)
575 | #define xlcOpenLinks (2 | xlCommand)
576 | #define xlcCloseAll (3 | xlCommand)
577 | #define xlcSave (4 | xlCommand)
578 | #define xlcSaveAs (5 | xlCommand)
579 | #define xlcFileDelete (6 | xlCommand)
580 | #define xlcPageSetup (7 | xlCommand)
581 | #define xlcPrint (8 | xlCommand)
582 | #define xlcPrinterSetup (9 | xlCommand)
583 | #define xlcQuit (10 | xlCommand)
584 | #define xlcNewWindow (11 | xlCommand)
585 | #define xlcArrangeAll (12 | xlCommand)
586 | #define xlcWindowSize (13 | xlCommand)
587 | #define xlcWindowMove (14 | xlCommand)
588 | #define xlcFull (15 | xlCommand)
589 | #define xlcClose (16 | xlCommand)
590 | #define xlcRun (17 | xlCommand)
591 | #define xlcSetPrintArea (22 | xlCommand)
592 | #define xlcSetPrintTitles (23 | xlCommand)
593 | #define xlcSetPageBreak (24 | xlCommand)
594 | #define xlcRemovePageBreak (25 | xlCommand)
595 | #define xlcFont (26 | xlCommand)
596 | #define xlcDisplay (27 | xlCommand)
597 | #define xlcProtectDocument (28 | xlCommand)
598 | #define xlcPrecision (29 | xlCommand)
599 | #define xlcA1R1c1 (30 | xlCommand)
600 | #define xlcCalculateNow (31 | xlCommand)
601 | #define xlcCalculation (32 | xlCommand)
602 | #define xlcDataFind (34 | xlCommand)
603 | #define xlcExtract (35 | xlCommand)
604 | #define xlcDataDelete (36 | xlCommand)
605 | #define xlcSetDatabase (37 | xlCommand)
606 | #define xlcSetCriteria (38 | xlCommand)
607 | #define xlcSort (39 | xlCommand)
608 | #define xlcDataSeries (40 | xlCommand)
609 | #define xlcTable (41 | xlCommand)
610 | #define xlcFormatNumber (42 | xlCommand)
611 | #define xlcAlignment (43 | xlCommand)
612 | #define xlcStyle (44 | xlCommand)
613 | #define xlcBorder (45 | xlCommand)
614 | #define xlcCellProtection (46 | xlCommand)
615 | #define xlcColumnWidth (47 | xlCommand)
616 | #define xlcUndo (48 | xlCommand)
617 | #define xlcCut (49 | xlCommand)
618 | #define xlcCopy (50 | xlCommand)
619 | #define xlcPaste (51 | xlCommand)
620 | #define xlcClear (52 | xlCommand)
621 | #define xlcPasteSpecial (53 | xlCommand)
622 | #define xlcEditDelete (54 | xlCommand)
623 | #define xlcInsert (55 | xlCommand)
624 | #define xlcFillRight (56 | xlCommand)
625 | #define xlcFillDown (57 | xlCommand)
626 | #define xlcDefineName (61 | xlCommand)
627 | #define xlcCreateNames (62 | xlCommand)
628 | #define xlcFormulaGoto (63 | xlCommand)
629 | #define xlcFormulaFind (64 | xlCommand)
630 | #define xlcSelectLastCell (65 | xlCommand)
631 | #define xlcShowActiveCell (66 | xlCommand)
632 | #define xlcGalleryArea (67 | xlCommand)
633 | #define xlcGalleryBar (68 | xlCommand)
634 | #define xlcGalleryColumn (69 | xlCommand)
635 | #define xlcGalleryLine (70 | xlCommand)
636 | #define xlcGalleryPie (71 | xlCommand)
637 | #define xlcGalleryScatter (72 | xlCommand)
638 | #define xlcCombination (73 | xlCommand)
639 | #define xlcPreferred (74 | xlCommand)
640 | #define xlcAddOverlay (75 | xlCommand)
641 | #define xlcGridlines (76 | xlCommand)
642 | #define xlcSetPreferred (77 | xlCommand)
643 | #define xlcAxes (78 | xlCommand)
644 | #define xlcLegend (79 | xlCommand)
645 | #define xlcAttachText (80 | xlCommand)
646 | #define xlcAddArrow (81 | xlCommand)
647 | #define xlcSelectChart (82 | xlCommand)
648 | #define xlcSelectPlotArea (83 | xlCommand)
649 | #define xlcPatterns (84 | xlCommand)
650 | #define xlcMainChart (85 | xlCommand)
651 | #define xlcOverlay (86 | xlCommand)
652 | #define xlcScale (87 | xlCommand)
653 | #define xlcFormatLegend (88 | xlCommand)
654 | #define xlcFormatText (89 | xlCommand)
655 | #define xlcEditRepeat (90 | xlCommand)
656 | #define xlcParse (91 | xlCommand)
657 | #define xlcJustify (92 | xlCommand)
658 | #define xlcHide (93 | xlCommand)
659 | #define xlcUnhide (94 | xlCommand)
660 | #define xlcWorkspace (95 | xlCommand)
661 | #define xlcFormula (96 | xlCommand)
662 | #define xlcFormulaFill (97 | xlCommand)
663 | #define xlcFormulaArray (98 | xlCommand)
664 | #define xlcDataFindNext (99 | xlCommand)
665 | #define xlcDataFindPrev (100 | xlCommand)
666 | #define xlcFormulaFindNext (101 | xlCommand)
667 | #define xlcFormulaFindPrev (102 | xlCommand)
668 | #define xlcActivate (103 | xlCommand)
669 | #define xlcActivateNext (104 | xlCommand)
670 | #define xlcActivatePrev (105 | xlCommand)
671 | #define xlcUnlockedNext (106 | xlCommand)
672 | #define xlcUnlockedPrev (107 | xlCommand)
673 | #define xlcCopyPicture (108 | xlCommand)
674 | #define xlcSelect (109 | xlCommand)
675 | #define xlcDeleteName (110 | xlCommand)
676 | #define xlcDeleteFormat (111 | xlCommand)
677 | #define xlcVline (112 | xlCommand)
678 | #define xlcHline (113 | xlCommand)
679 | #define xlcVpage (114 | xlCommand)
680 | #define xlcHpage (115 | xlCommand)
681 | #define xlcVscroll (116 | xlCommand)
682 | #define xlcHscroll (117 | xlCommand)
683 | #define xlcAlert (118 | xlCommand)
684 | #define xlcNew (119 | xlCommand)
685 | #define xlcCancelCopy (120 | xlCommand)
686 | #define xlcShowClipboard (121 | xlCommand)
687 | #define xlcMessage (122 | xlCommand)
688 | #define xlcPasteLink (124 | xlCommand)
689 | #define xlcAppActivate (125 | xlCommand)
690 | #define xlcDeleteArrow (126 | xlCommand)
691 | #define xlcRowHeight (127 | xlCommand)
692 | #define xlcFormatMove (128 | xlCommand)
693 | #define xlcFormatSize (129 | xlCommand)
694 | #define xlcFormulaReplace (130 | xlCommand)
695 | #define xlcSendKeys (131 | xlCommand)
696 | #define xlcSelectSpecial (132 | xlCommand)
697 | #define xlcApplyNames (133 | xlCommand)
698 | #define xlcReplaceFont (134 | xlCommand)
699 | #define xlcFreezePanes (135 | xlCommand)
700 | #define xlcShowInfo (136 | xlCommand)
701 | #define xlcSplit (137 | xlCommand)
702 | #define xlcOnWindow (138 | xlCommand)
703 | #define xlcOnData (139 | xlCommand)
704 | #define xlcDisableInput (140 | xlCommand)
705 | #define xlcEcho (141 | xlCommand)
706 | #define xlcOutline (142 | xlCommand)
707 | #define xlcListNames (143 | xlCommand)
708 | #define xlcFileClose (144 | xlCommand)
709 | #define xlcSaveWorkbook (145 | xlCommand)
710 | #define xlcDataForm (146 | xlCommand)
711 | #define xlcCopyChart (147 | xlCommand)
712 | #define xlcOnTime (148 | xlCommand)
713 | #define xlcWait (149 | xlCommand)
714 | #define xlcFormatFont (150 | xlCommand)
715 | #define xlcFillUp (151 | xlCommand)
716 | #define xlcFillLeft (152 | xlCommand)
717 | #define xlcDeleteOverlay (153 | xlCommand)
718 | #define xlcNote (154 | xlCommand)
719 | #define xlcShortMenus (155 | xlCommand)
720 | #define xlcSetUpdateStatus (159 | xlCommand)
721 | #define xlcColorPalette (161 | xlCommand)
722 | #define xlcDeleteStyle (162 | xlCommand)
723 | #define xlcWindowRestore (163 | xlCommand)
724 | #define xlcWindowMaximize (164 | xlCommand)
725 | #define xlcError (165 | xlCommand)
726 | #define xlcChangeLink (166 | xlCommand)
727 | #define xlcCalculateDocument (167 | xlCommand)
728 | #define xlcOnKey (168 | xlCommand)
729 | #define xlcAppRestore (169 | xlCommand)
730 | #define xlcAppMove (170 | xlCommand)
731 | #define xlcAppSize (171 | xlCommand)
732 | #define xlcAppMinimize (172 | xlCommand)
733 | #define xlcAppMaximize (173 | xlCommand)
734 | #define xlcBringToFront (174 | xlCommand)
735 | #define xlcSendToBack (175 | xlCommand)
736 | #define xlcMainChartType (185 | xlCommand)
737 | #define xlcOverlayChartType (186 | xlCommand)
738 | #define xlcSelectEnd (187 | xlCommand)
739 | #define xlcOpenMail (188 | xlCommand)
740 | #define xlcSendMail (189 | xlCommand)
741 | #define xlcStandardFont (190 | xlCommand)
742 | #define xlcConsolidate (191 | xlCommand)
743 | #define xlcSortSpecial (192 | xlCommand)
744 | #define xlcGallery3dArea (193 | xlCommand)
745 | #define xlcGallery3dColumn (194 | xlCommand)
746 | #define xlcGallery3dLine (195 | xlCommand)
747 | #define xlcGallery3dPie (196 | xlCommand)
748 | #define xlcView3d (197 | xlCommand)
749 | #define xlcGoalSeek (198 | xlCommand)
750 | #define xlcWorkgroup (199 | xlCommand)
751 | #define xlcFillGroup (200 | xlCommand)
752 | #define xlcUpdateLink (201 | xlCommand)
753 | #define xlcPromote (202 | xlCommand)
754 | #define xlcDemote (203 | xlCommand)
755 | #define xlcShowDetail (204 | xlCommand)
756 | #define xlcUngroup (206 | xlCommand)
757 | #define xlcObjectProperties (207 | xlCommand)
758 | #define xlcSaveNewObject (208 | xlCommand)
759 | #define xlcShare (209 | xlCommand)
760 | #define xlcShareName (210 | xlCommand)
761 | #define xlcDuplicate (211 | xlCommand)
762 | #define xlcApplyStyle (212 | xlCommand)
763 | #define xlcAssignToObject (213 | xlCommand)
764 | #define xlcObjectProtection (214 | xlCommand)
765 | #define xlcHideObject (215 | xlCommand)
766 | #define xlcSetExtract (216 | xlCommand)
767 | #define xlcCreatePublisher (217 | xlCommand)
768 | #define xlcSubscribeTo (218 | xlCommand)
769 | #define xlcAttributes (219 | xlCommand)
770 | #define xlcShowToolbar (220 | xlCommand)
771 | #define xlcPrintPreview (222 | xlCommand)
772 | #define xlcEditColor (223 | xlCommand)
773 | #define xlcShowLevels (224 | xlCommand)
774 | #define xlcFormatMain (225 | xlCommand)
775 | #define xlcFormatOverlay (226 | xlCommand)
776 | #define xlcOnRecalc (227 | xlCommand)
777 | #define xlcEditSeries (228 | xlCommand)
778 | #define xlcDefineStyle (229 | xlCommand)
779 | #define xlcLinePrint (240 | xlCommand)
780 | #define xlcEnterData (243 | xlCommand)
781 | #define xlcGalleryRadar (249 | xlCommand)
782 | #define xlcMergeStyles (250 | xlCommand)
783 | #define xlcEditionOptions (251 | xlCommand)
784 | #define xlcPastePicture (252 | xlCommand)
785 | #define xlcPastePictureLink (253 | xlCommand)
786 | #define xlcSpelling (254 | xlCommand)
787 | #define xlcZoom (256 | xlCommand)
788 | #define xlcResume (258 | xlCommand)
789 | #define xlcInsertObject (259 | xlCommand)
790 | #define xlcWindowMinimize (260 | xlCommand)
791 | #define xlcSize (261 | xlCommand)
792 | #define xlcMove (262 | xlCommand)
793 | #define xlcSoundNote (265 | xlCommand)
794 | #define xlcSoundPlay (266 | xlCommand)
795 | #define xlcFormatShape (267 | xlCommand)
796 | #define xlcExtendPolygon (268 | xlCommand)
797 | #define xlcFormatAuto (269 | xlCommand)
798 | #define xlcGallery3dBar (272 | xlCommand)
799 | #define xlcGallery3dSurface (273 | xlCommand)
800 | #define xlcFillAuto (274 | xlCommand)
801 | #define xlcCustomizeToolbar (276 | xlCommand)
802 | #define xlcAddTool (277 | xlCommand)
803 | #define xlcEditObject (278 | xlCommand)
804 | #define xlcOnDoubleclick (279 | xlCommand)
805 | #define xlcOnEntry (280 | xlCommand)
806 | #define xlcWorkbookAdd (281 | xlCommand)
807 | #define xlcWorkbookMove (282 | xlCommand)
808 | #define xlcWorkbookCopy (283 | xlCommand)
809 | #define xlcWorkbookOptions (284 | xlCommand)
810 | #define xlcSaveWorkspace (285 | xlCommand)
811 | #define xlcChartWizard (288 | xlCommand)
812 | #define xlcDeleteTool (289 | xlCommand)
813 | #define xlcMoveTool (290 | xlCommand)
814 | #define xlcWorkbookSelect (291 | xlCommand)
815 | #define xlcWorkbookActivate (292 | xlCommand)
816 | #define xlcAssignToTool (293 | xlCommand)
817 | #define xlcCopyTool (295 | xlCommand)
818 | #define xlcResetTool (296 | xlCommand)
819 | #define xlcConstrainNumeric (297 | xlCommand)
820 | #define xlcPasteTool (298 | xlCommand)
821 | #define xlcPlacement (300 | xlCommand)
822 | #define xlcFillWorkgroup (301 | xlCommand)
823 | #define xlcWorkbookNew (302 | xlCommand)
824 | #define xlcScenarioCells (305 | xlCommand)
825 | #define xlcScenarioDelete (306 | xlCommand)
826 | #define xlcScenarioAdd (307 | xlCommand)
827 | #define xlcScenarioEdit (308 | xlCommand)
828 | #define xlcScenarioShow (309 | xlCommand)
829 | #define xlcScenarioShowNext (310 | xlCommand)
830 | #define xlcScenarioSummary (311 | xlCommand)
831 | #define xlcPivotTableWizard (312 | xlCommand)
832 | #define xlcPivotFieldProperties (313 | xlCommand)
833 | #define xlcPivotField (314 | xlCommand)
834 | #define xlcPivotItem (315 | xlCommand)
835 | #define xlcPivotAddFields (316 | xlCommand)
836 | #define xlcOptionsCalculation (318 | xlCommand)
837 | #define xlcOptionsEdit (319 | xlCommand)
838 | #define xlcOptionsView (320 | xlCommand)
839 | #define xlcAddinManager (321 | xlCommand)
840 | #define xlcMenuEditor (322 | xlCommand)
841 | #define xlcAttachToolbars (323 | xlCommand)
842 | #define xlcVbaReset (324 | xlCommand)
843 | #define xlcOptionsChart (325 | xlCommand)
844 | #define xlcStart (326 | xlCommand)
845 | #define xlcVbaEnd (327 | xlCommand)
846 | #define xlcVbaInsertFile (328 | xlCommand)
847 | #define xlcVbaProcedureDefinition (330 | xlCommand)
848 | #define xlcVbaReferences (331 | xlCommand)
849 | #define xlcVbaStepInto (332 | xlCommand)
850 | #define xlcVbaStepOver (333 | xlCommand)
851 | #define xlcVbaToggleBreakpoint (334 | xlCommand)
852 | #define xlcVbaClearBreakpoints (335 | xlCommand)
853 | #define xlcRoutingSlip (336 | xlCommand)
854 | #define xlcRouteDocument (338 | xlCommand)
855 | #define xlcMailLogon (339 | xlCommand)
856 | #define xlcInsertPicture (342 | xlCommand)
857 | #define xlcEditTool (343 | xlCommand)
858 | #define xlcGalleryDoughnut (344 | xlCommand)
859 | #define xlcVbaObjectBrowser (345 | xlCommand)
860 | #define xlcVbaDebugWindow (346 | xlCommand)
861 | #define xlcVbaAddWatch (347 | xlCommand)
862 | #define xlcVbaEditWatch (348 | xlCommand)
863 | #define xlcVbaInstantWatch (349 | xlCommand)
864 | #define xlcChartTrend (350 | xlCommand)
865 | #define xlcPivotItemProperties (352 | xlCommand)
866 | #define xlcWorkbookInsert (354 | xlCommand)
867 | #define xlcOptionsTransition (355 | xlCommand)
868 | #define xlcOptionsGeneral (356 | xlCommand)
869 | #define xlcFilterAdvanced (370 | xlCommand)
870 | #define xlcMailAddMailer (373 | xlCommand)
871 | #define xlcMailDeleteMailer (374 | xlCommand)
872 | #define xlcMailReply (375 | xlCommand)
873 | #define xlcMailReplyAll (376 | xlCommand)
874 | #define xlcMailForward (377 | xlCommand)
875 | #define xlcMailNextLetter (378 | xlCommand)
876 | #define xlcDataLabel (379 | xlCommand)
877 | #define xlcInsertTitle (380 | xlCommand)
878 | #define xlcFontProperties (381 | xlCommand)
879 | #define xlcMacroOptions (382 | xlCommand)
880 | #define xlcWorkbookHide (383 | xlCommand)
881 | #define xlcWorkbookUnhide (384 | xlCommand)
882 | #define xlcWorkbookDelete (385 | xlCommand)
883 | #define xlcWorkbookName (386 | xlCommand)
884 | #define xlcGalleryCustom (388 | xlCommand)
885 | #define xlcAddChartAutoformat (390 | xlCommand)
886 | #define xlcDeleteChartAutoformat (391 | xlCommand)
887 | #define xlcChartAddData (392 | xlCommand)
888 | #define xlcAutoOutline (393 | xlCommand)
889 | #define xlcTabOrder (394 | xlCommand)
890 | #define xlcShowDialog (395 | xlCommand)
891 | #define xlcSelectAll (396 | xlCommand)
892 | #define xlcUngroupSheets (397 | xlCommand)
893 | #define xlcSubtotalCreate (398 | xlCommand)
894 | #define xlcSubtotalRemove (399 | xlCommand)
895 | #define xlcRenameObject (400 | xlCommand)
896 | #define xlcWorkbookScroll (412 | xlCommand)
897 | #define xlcWorkbookNext (413 | xlCommand)
898 | #define xlcWorkbookPrev (414 | xlCommand)
899 | #define xlcWorkbookTabSplit (415 | xlCommand)
900 | #define xlcFullScreen (416 | xlCommand)
901 | #define xlcWorkbookProtect (417 | xlCommand)
902 | #define xlcScrollbarProperties (420 | xlCommand)
903 | #define xlcPivotShowPages (421 | xlCommand)
904 | #define xlcTextToColumns (422 | xlCommand)
905 | #define xlcFormatCharttype (423 | xlCommand)
906 | #define xlcLinkFormat (424 | xlCommand)
907 | #define xlcTracerDisplay (425 | xlCommand)
908 | #define xlcTracerNavigate (430 | xlCommand)
909 | #define xlcTracerClear (431 | xlCommand)
910 | #define xlcTracerError (432 | xlCommand)
911 | #define xlcPivotFieldGroup (433 | xlCommand)
912 | #define xlcPivotFieldUngroup (434 | xlCommand)
913 | #define xlcCheckboxProperties (435 | xlCommand)
914 | #define xlcLabelProperties (436 | xlCommand)
915 | #define xlcListboxProperties (437 | xlCommand)
916 | #define xlcEditboxProperties (438 | xlCommand)
917 | #define xlcPivotRefresh (439 | xlCommand)
918 | #define xlcLinkCombo (440 | xlCommand)
919 | #define xlcOpenText (441 | xlCommand)
920 | #define xlcHideDialog (442 | xlCommand)
921 | #define xlcSetDialogFocus (443 | xlCommand)
922 | #define xlcEnableObject (444 | xlCommand)
923 | #define xlcPushbuttonProperties (445 | xlCommand)
924 | #define xlcSetDialogDefault (446 | xlCommand)
925 | #define xlcFilter (447 | xlCommand)
926 | #define xlcFilterShowAll (448 | xlCommand)
927 | #define xlcClearOutline (449 | xlCommand)
928 | #define xlcFunctionWizard (450 | xlCommand)
929 | #define xlcAddListItem (451 | xlCommand)
930 | #define xlcSetListItem (452 | xlCommand)
931 | #define xlcRemoveListItem (453 | xlCommand)
932 | #define xlcSelectListItem (454 | xlCommand)
933 | #define xlcSetControlValue (455 | xlCommand)
934 | #define xlcSaveCopyAs (456 | xlCommand)
935 | #define xlcOptionsListsAdd (458 | xlCommand)
936 | #define xlcOptionsListsDelete (459 | xlCommand)
937 | #define xlcSeriesAxes (460 | xlCommand)
938 | #define xlcSeriesX (461 | xlCommand)
939 | #define xlcSeriesY (462 | xlCommand)
940 | #define xlcErrorbarX (463 | xlCommand)
941 | #define xlcErrorbarY (464 | xlCommand)
942 | #define xlcFormatChart (465 | xlCommand)
943 | #define xlcSeriesOrder (466 | xlCommand)
944 | #define xlcMailLogoff (467 | xlCommand)
945 | #define xlcClearRoutingSlip (468 | xlCommand)
946 | #define xlcAppActivateMicrosoft (469 | xlCommand)
947 | #define xlcMailEditMailer (470 | xlCommand)
948 | #define xlcOnSheet (471 | xlCommand)
949 | #define xlcStandardWidth (472 | xlCommand)
950 | #define xlcScenarioMerge (473 | xlCommand)
951 | #define xlcSummaryInfo (474 | xlCommand)
952 | #define xlcFindFile (475 | xlCommand)
953 | #define xlcActiveCellFont (476 | xlCommand)
954 | #define xlcEnableTipwizard (477 | xlCommand)
955 | #define xlcVbaMakeAddin (478 | xlCommand)
956 | #define xlcMailSendMailer (482 | xlCommand)
957 | 
958 | #ifdef __cplusplus
959 | }            /* End of extern "C" { */
960 | #endif    /* __cplusplus */
961 | 


--------------------------------------------------------------------------------
/cbits/xlcall32.lib:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/bnikolic/ExPy/faf2781b08f785a28090698d97010a72b2443748/cbits/xlcall32.lib


--------------------------------------------------------------------------------
/xls/ExPyExamples.xlsx:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/bnikolic/ExPy/faf2781b08f785a28090698d97010a72b2443748/xls/ExPyExamples.xlsx


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