

- #STEP 7 MICRO WIN COMPILE ERROR HOW TO#
- #STEP 7 MICRO WIN COMPILE ERROR 64 BIT#
- #STEP 7 MICRO WIN COMPILE ERROR UPDATE#
- #STEP 7 MICRO WIN COMPILE ERROR CODE#
Private Declare Function swe_difcs2n_d Lib "swedll32.dll" _ Private Declare Function swe_difcs2n Lib "swedll32.dll" _ Private Declare Function swe_deltat_d Lib "swedll32.dll" _ Private Declare Function swe_deltat Lib "swedll32.dll" _ Private Declare Function swe_degnorm_d Lib "swedll32.dll" _ Private Declare Function swe_degnorm Lib "swedll32.dll" _ Private Declare Function swe_day_of_week_d Lib "swedll32.dll" _ Private Declare Function swe_day_of_week Lib "swedll32.dll" _ Private Declare Function swe_date_conversion_d Lib "swedll32.dll" _ Private Declare Function swe_date_conversion Lib "swedll32.dll" _ Private Declare Function swe_d2l_d Lib "swedll32.dll" _ Private Declare Function swe_d2l Lib "swedll32.dll" _ Private Declare Function swe_csroundsec_d Lib "swedll32.dll" _ Private Declare Function swe_csroundsec Lib "swedll32.dll" _

Private Declare Function swe_csnorm_d Lib "swedll32.dll" _ Private Declare Function swe_csnorm Lib "swedll32.dll" _ Private Declare Function swe_cs2timestr_d Lib "swedll32.dll" _ Private Declare Sub swe_cs2timestr Lib "swedll32.dll" _ Private Declare Function swe_cs2lonlatstr_d Lib "swedll32.dll" _ Private Declare Sub swe_cs2lonlatstr Lib "swedll32.dll" _ Private Declare Function swe_cs2degstr_d Lib "swedll32.dll" _ Private Declare Sub swe_cs2degstr Lib "swedll32.dll" _ Private Declare Function swe_cotrans_sp_d Lib "swedll32.dll" _ Private Declare Sub swe_cotrans_sp Lib "swedll32.dll" _ Private Declare Function swe_cotrans_d Lib "swedll32.dll" _ Private Declare Sub swe_cotrans Lib "swedll32.dll" _ Private Declare Function swe_close_d Lib "swedll32.dll" _

Private Declare Function swe_close Lib "swedll32.dll" _ Private Declare Function swe_calc_ut_d Lib "swedll32.dll" _ Private Declare Function swe_calc_ut Lib "swedll32.dll" _

Private Declare Function swe_calc_d Lib "swedll32.dll" _ ) As Long ' x must be first of six array elements Private Declare Function swe_calc Lib "swedll32.dll" _ 'xout must be the first of three array elements Private Declare Function swe_azalt_rev Lib "swedll32.dll" _ 'xaz must be the first of three array elements 'xin must be the first of two array elements ) As Long 'geopos must be the first of three array elements Private Declare Function swe_azalt Lib "swedll32.dll" _ ' directory where it can be found at runtime ' The DLL file must exist in the same directory, or in a system Problem in Module Name: MainCalculations 'Swiss Ephemeris Release 1.60
#STEP 7 MICRO WIN COMPILE ERROR HOW TO#
This website (under "Which Longs should become LongPtr?") gives a clue though, as to how to know which one to modify.
#STEP 7 MICRO WIN COMPILE ERROR 64 BIT#
Unfortunately, after adding ' PtrSafe' everywhere, though the VBA errors stopped, but the values are not being displayed/calculated properly in the cells.įrom a post on 64 Bit in VBA from Microsoft, it would seem that we also need to modify some of the data types such as:
#STEP 7 MICRO WIN COMPILE ERROR UPDATE#
Please review and update Declare statements and then mark them with the PtrSafe attribute.Īs I said above, it works only in 32bit office (Excel) but it won't work in my 圆4 Excel However there seems to be a workaround but I am too much of a novice to get it.
#STEP 7 MICRO WIN COMPILE ERROR CODE#
The code in this project must be updated for use on 64-bit systems. However, when I try to run it on my end, which is on Excel 圆4, ASAP it's opened, the VBA editor fires up and gives me the following error: Compile error: It uses the Swiss Ephemeris file ( swedll32.dll) to do a lot of astronomical calculations. I have an excel file, which has some modules in it, and works flawlessly in Office (Excel) x86.
