variable zelladresse an formel übergeben

[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

[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

[Karolus]

Hallo

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

Gruß Karo

[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