openoffice-users-de mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Oliver Brinzing <Oliver.Brinz...@gmx.de>
Subject Fwd: Re: Aufrunden in Basic-Makro?
Date Thu, 25 May 2017 13:48:23 GMT

Hi,

>> ich verzweifel gerade; ich müsste in einem Makro (also Basic) einen Wert
>> *aufrunden*, finde aber dazu keine Funktion. Gibt es wirklich nur INT

Du kannst aus Basic grds. die Calc Funktionen über csss.FunctionAccess
https://wiki.openoffice.org/wiki/Documentation/DevGuide/Spreadsheets/Function_Handling#Calculating_Function_Results
aufrufen

Gruß
Oliver

OPTION EXPLICIT
Sub Main
	Dim oFuncAccess as Object
	Dim num as Double
	Dim res as Double
	Dim count as Integer

	num = 123.45678
	count = 1

	oFuncAccess = createUnoService( "com.sun.star.sheet.FunctionAccess")
	res = oFuncAccess.callFunction("ROUND", Array(num, count))
	msgBox res
End Sub


---------------------------------------------------------------------
To unsubscribe, e-mail: users-de-unsubscribe@openoffice.apache.org
For additional commands, e-mail: users-de-help@openoffice.apache.org


Mime
View raw message