[Wine] VBA in MSOffice?

[Morgan Read]

James
Thanks for getting back, comments in-line below.
Regards,
Morgan.

On 25/01/09 16:57, James McKenzie wrote:
> Morgan Read wrote:
>> Folks
>>
>> I have a macro that fails in Word, are there any work-arounds, alternate
>> dlls etc that can be suggested to get it going?  Is there any forum
>> dedicated to getting these going?
>>
>> I've installed MSOffice like so:
>> cd "/media/Office 2003 Pro/OFFICE";\
>> # Set your preferences
>> WINEPREFIX=~/.MSOffice winecfg;\
>> # Click through the dialogues
>> WINEPREFIX=~/.MSOffice winetricks wsh56 vb3run vb4run vb5run vb6run
>> msxml3 msxml4 msxml6 gecko;\
>> # Enter Pass-Key
>> WINEPREFIX=~/.MSOffice wine SETUP.EXE;\
>> ### This script seems to stall here???!!!
>> # Set "gdiplus" dll to "(native, builtin)"
>> WINEPREFIX=~/.MSOffice winecfg;\
>> WINEPREFIX=~/.MSOffice winetricks dcom98;\
>> done
>>
>> Any ideas?
>> Regards,
>> Morgan.
>>   
> Why all of the vb(x)runs?  VB6RUN is all you should need.
OK, thanks

> In your listings you had many fixmes.  These just point out where
> additional functionality needs to be worked on but will work for Office
> 2003.
OK, good

> What SPECIFICALLY happens when you attempt to run the VBA macro?  Does
> it fail to fire, Word crashes, or does Linux lock up so that you have to
> reboot?
Fails to fire I guess, no crash or lock-ups, just a trail of dialogues
on attempting to run the macro.  I included ALL the window dialogues I
got on that trail in the "listings" like this:
...
fixme:advapi:CheckTokenMembership ((nil) 0x21ff90 0x32f7ec) stub!
fixme:advapi:CheckTokenMembership ((nil) 0x21ff90 0x32f7ec) stub!

-------------------------------------------------------------------------------
File > Open (template with macros & enable)
Tools > Macros > Macros... > Run
-------------------------------------------------------------------------------

fixme:psdrv:PSDRV_DeviceCapabilities DC_BINADJUST: stub.
fixme:win:EnumDisplayDevicesW ((null),0,0x3282ec,0x00000000), stub!
...

They're all that happened - I've included it again below.

> Can you add what you get from your terminal session when you attempt to
> run the macro when you start Word from there, please.
That's what I included following my sig and I assumed you meant by
"listings".  I've copied it again below.



Below is the output from the command prompt/terminal session (with
corresponding window dialogues separated by ------------'s):

$ WINEPREFIX=~/.MSOffice wine "C:\Program Files\Microsoft
Office\OFFICE11\WINWORD.EXE"
err:module:attach_process_dlls "rpcrt4.dll" failed to initialize, aborting
err:module:LdrInitializeThunk Main exe initialization for
L"C:\\windows\\system32\\explorer.exe" failed, status c0000005
fixme:psdrv:PSDRV_DeviceCapabilities DC_BINADJUST: stub.
fixme:psdrv:PSDRV_DeviceCapabilities DC_BINADJUST: stub.
fixme:psdrv:PSDRV_DeviceCapabilities DC_BINADJUST: stub.
fixme:psdrv:PSDRV_ExtEscape QUERYESCSUPPORT(25) - not supported.
fixme:psdrv:PSDRV_DeviceCapabilities DC_BINADJUST: stub.
fixme:psdrv:PSDRV_DeviceCapabilities DC_BINADJUST: stub.
fixme:reg:GetNativeSystemInfo (0x32f7e4) using GetSystemInfo()
fixme:advapi:CheckTokenMembership ((nil) 0x21ff90 0x32f7ec) stub!
fixme:advapi:CheckTokenMembership ((nil) 0x21ff90 0x32f7ec) stub!

-------------------------------------------------------------------------------
File > Open (template with macros & enable)
Tools > Macros > Macros... > Run
-------------------------------------------------------------------------------

fixme:psdrv:PSDRV_DeviceCapabilities DC_BINADJUST: stub.
fixme:win:EnumDisplayDevicesW ((null),0,0x3282ec,0x00000000), stub!
fixme:wtsapi:WTSRegisterSessionNotification Stub 0x10092 0x00000000
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:shell:DllCanUnloadNow stub
fixme:shell:DllCanUnloadNow stub
fixme:time:GetCalendarInfoW Unimplemented caltype 1
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_GETLANGOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETLANGOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_GETLANGOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETLANGOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_GETLANGOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETLANGOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:dciman:DCICreatePrimary 0x998c 0x27613b0
fixme:richedit:CreateTextServices Support aggregation

-------------------------------------------------------------------------------
Microsoft Visual Basic
System Error &H80040110
_[OK]_ [Help]
-------------------------------------------------------------------------------

fixme:dciman:DCICreatePrimary 0x8450 0x23b13b0

-------------------------------------------------------------------------------
Microsoft Visual Basic
Out of memory
_[OK]_ [Help]
-------------------------------------------------------------------------------

fixme:font:WineEngCreateFontInstance Untranslated charset 255
fixme:reg:GetNativeSystemInfo (0x329b98) using GetSystemInfo()
fixme:advapi:CheckTokenMembership ((nil) 0x1ff3938 0x329ba0) stub!
fixme:advapi:CheckTokenMembership ((nil) 0x1ff3938 0x329ba0) stub!
fixme:shell:DllCanUnloadNow stub
fixme:shell:DllCanUnloadNow stub

-------------------------------------------------------------------------------
Microsoft Visual Basic - Document 2 [break]
(The debugger generated window.)
File > Close and Return to Microsoft Word Alt+Q
-------------------------------------------------------------------------------

fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub

-------------------------------------------------------------------------------
Microsoft Visual Basic
This command will stop the Debugger.
_[OK]_ [Cancel] [Help]
-------------------------------------------------------------------------------
Document2 - Microsoft Word
(The template/macro generated window.)
File > Exit
-------------------------------------------------------------------------------

fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETBIDIOPTIONS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub
fixme:richedit:ME_HandleMessage EM_SETMARGINS: stub

-- 
Getting errors: "There are problems with the signature" (or similar)?
Update your system by installing certificates from CAcert Inc, see here:
http://wiki.cacert.org/wiki/BrowserClients?#head-259758ec5ba51c5205cfb179cf60e0b54d9e378b
Or, if Internet Explorer is your default browser, simply click this link:
http://www.cacert.org/index.php?id=17

Morgan Read
NEW ZEALAND
<mailto:mstuffATreadDOTorgDOTnz>

fedora + freedom; fact || fiction?
http://fedoraproject.org/wiki/Overview
get freed-ora!
http://www.fsfla.org/svnwiki/selibre/linux-libre/freed-ora