ZÄHLENWENN() im Makro aufrufen [gelöst]

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: ZÄHLENWENN() im Makro aufrufen [gelöst]

Re: ZÄHLENWENN() im Makro aufrufen

von clag » So, 13.03.2011 17:37

Hallo Axel,

allerbesten Dank für deinen Hinweis,
denn kaum macht man es richtig, schon funktioniert es .... :lol:

Aber woher soll man das wissen, bei meiner web Stöberei hatte ich nichts in der Art gelesen
aber nu ist alles im Lot :)

@ Karo
ohne die " hatte ich es auch schon probiert aber des konnt ja nix werden ... ;)

Re: ZÄHLENWENN() im Makro aufrufen

von Axel Richter » So, 13.03.2011 17:26

Hallo Clag,

die Funktion COUNTIF erwartet als ersten Parameter keinen String, sondern ein XCellRange.
http://api.openoffice.org/docs/common/r ... llFunction

Code: Alles auswählen

oFunctionAccess = createUnoService("com.sun.star.sheet.FunctionAccess")

oXCellRange = thiscomponent.Sheets(0).getCellRangeByName("B2:B100")

Dim args( 1 ) As Variant
   args(0) = oXCellRange
   args(1) = "x"
result = oFunctionAccess.callFunction( "COUNTIF", args() ) 

msgbox result
viele Grüße

Axel

Re: ZÄHLENWENN() im Makro aufrufen

von Karolus » So, 13.03.2011 17:25

Hallo
Für Basic ist "B2:B100" ein ganz normaler Text...

Gruß Karo

ZÄHLENWENN() im Makro aufrufen [gelöst]

von clag » So, 13.03.2011 17:12

Hallo Kenner und Könner,

ich möchte im Makro die Funktion ZÄHLENWENN() ausführen aber leider verweigert mit mein Makro das

Code: Alles auswählen

oFunctionAccess = createUnoService( "com.sun.star.sheet.FunctionAccess" )

Dim args( 1 ) As Variant
   args(0) = "B2:B100"
   args(1) = "x"
result = oFunctionAccess.callFunction( "COUNTIF", args() ) 
print result
so habe ich das versucht das bringt aber eine "IllegalArgumentExeption" :(

was mache ich falsch?

Nach oben