Seite 1 von 1

variable zelladresse an formel übergeben

Verfasst: Fr, 14.12.2007 13:01
von kannenklaus
hallo

folgendes makro funktioniert nur bei einer festen zelladressierung

Code: Alles auswählen

Sub CountIf
Dim s1
ss="AA2"
oSheet = thisComponent.sheets.getbyindex(0) 
oSheet.getCellRangeByName("AB2").setFormula("=COUNTIF(A2:AA2;""hoch"")")
exit sub
AA2 ist jedoch variabel. kann dies der formel übergeben bzw. klarmachen.

freue mich auf eine antwort.

klaus

Re: variable zelladresse an formel übergeben

Verfasst: Fr, 14.12.2007 13:39
von komma4

Code: Alles auswählen

Sub myCountIf2Range( RangeName as String, ZelleStart as String, ZelleEnde as String )
Dim s1

s1= "=COUNTIF(" & ZelleStart & ":" & ZelleEnde & "; " &  """hoch""" & ")"

oSheet = thisComponent.sheets.getbyindex(0)
oSheet.getCellRangeByName( RangeName ).setFormula( s1 )

end sub

Re: variable zelladresse an formel übergeben

Verfasst: Fr, 14.12.2007 13:44
von Karolus
Hallo

oSheet.getCellRangeByName("AB2").Formula = "=COUNTIF(A2:" & ss & ";""hoch"")"

Gruß Karo

Re: variable zelladresse an formel übergeben

Verfasst: Fr, 14.12.2007 14:24
von kannenklaus
hallo

danke die lösung von karo klappt, die von winfried noch nicht. wie kann ich die zelladresse als string auslesen/ermitteln`?

danke klaus