Vielen Dank, Sebastian, für den Code.
Viele Grüße
Wolfgang
Sebastian Knapp wrote:
Also erstmal muss ich mich korrigieren. Es funktioniert zwar beliebige
Bibliotheken auf diesem Weg zu laden. Aber die Funktionen die man
in Calc aufruft müssen tatsächlich in der Standardbibliothek liegen.
Zumindest sieht es so aus. Vielleicht hilft es dir ja trotzdem.
Ich glaube, es wird wirklich das einfachste sein, die Funktionen, die
ich in Calc gebrauche, in der Standard-Bibliothek zu lassen. Bestimmt
kann ich die Idee, Bibliotheken zu laden, anederweitig brauchen. Mir
scheinen auf diese Weise Anpassungen z.B. mehrerer Rechner komfortabler
zu sein.
Viele Grüße
Wolfgang
Beispielcode für die Bibliothek:
' Bibliothek: StartMakros
' Modul: Start
Sub Main
MsgBox( MyPlus(10,20) )
End Sub
' Dieses Makro über Extras > Anpassen > Erignisse mit dem Öffnen des
Dokuments verbinden
Sub LoadLibsOnStart()
If Not BasicLibraries.isLibraryLoaded("Tools") Then
BasicLibraries.LoadLibrary("Tools")
End If
If Not BasicLibraries.isLibraryLoaded("MakroSammlung") Then
BasicLibraries.LoadLibrary("MakroSammlung")
End If
End Sub
Function MyPlus( a As Double, b As Double )
MyPlus = a+b
End Function
' *************************************
' Das in einem Modul in Standard gespeichert
Function MyPlus( a As Double, b As Double )
StartMakros.Start.MyPlus = a+b
End Function
'**************************************
sollte funktionieren - wenn ich keinen Tippfehler eingebaut habe.
Man braucht also in Standard nur ein Interface, bzw. Deklaration
ablegen, die nur auf die
echte Implementierung verweist.
Wenn man es so sieht bekommt es gleich einen professionelleren Touch.
Also bitte nicht traurig
sein, dass es doch nicht so einfach geht.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
