Let me start by saying that this works just fine using OOo for all cases
without resorting to Global.
Do you have Option Compatible set anywhere?
On 08/08/2011 11:42 AM, Johnny Rosenberg wrote:
I am testing some functions at the moment (I wrote them a few years
ago and now I'm trying to make them faster…) but I am a bit stuck at
the moment.
It looks something like this:
Module1
¯¯¯¯¯¯¯
' Code starts here
Option Explicit
Type Blahblah
This As Integer
That As Integer
End Type
Dim OneThing As Blahblah
Dim MoreStuff As Integer
Sub Main
Dim X As Integer
Some stuff
X=MyFunction(47)
More stuff
End Sub
' End of code
Module2
¯¯¯¯¯¯¯
' Code starts here
Function MyFunction(A As Integer) As Integer
Dim SomeValue As Integer
Some stuff
OneThing.This=A*SomeValue
More stuff
MyFunction=OneThing.This-A
End Function
' End of code
Now, when running this (with F5 or F8), it seems like it starts at
”Sub Main” and everything above it is omitted, so I get an error
message in module2 when ”OneThing” is mentioned.
Shouldn't the global things be available in all modules? They are if I
run similar macros from a spreadsheet, for example, that is not from
the Basic IDE.
Did I miss something here? Is there a way around it?
Kind regards
Johnny Rosenberg
ジョニー・ローゼンバーグ
--
Andrew Pitonyak
My Macro Document: http://www.pitonyak.org/AndrewMacro.odt
Info: http://www.pitonyak.org/oo.php
--
-----------------------------------------------------------------
To unsubscribe send email to dev-unsubscr...@api.openoffice.org
For additional commands send email to sy...@api.openoffice.org
with Subject: help
