Nochmal Hyperlink :D, diesmal : Schaltfläche

[keksi1970]

Nochmal Hyperlink

Ja, ich weiß, es nervt.

aber ich finde eine Schaltfläche schöner als ein TextField.

wie mach ich das, das statt diesem Textobjekt eine Schaltfläche kreiert wird ?

Code: Alles auswählen

		HyperlinkObject = oSheet.createInstance("com.sun.star.text.TextField.URL")
		HyperlinkObject.URL = (dateiname#sheetname.A1)
		HyperlinkObject.Representation = Sheetname
		ZelleObject.insertTextContent(ZelleText.createTextCursor(), HyperlinkObject, True)

btw : eigentlich möchte ich nur eine (oder mehrere) Schlatflächen erstellen, die auf ein bestimmtes Sheet (name vorhanden) "verlinken".
also was muß dort statt text.textfield.URL hin, daß ne Schaltfläche entsteht ?


lg
Andreas