Office: FormulaR1C1 mit dynamischen Variablen

Hallo zusammen

Ich hab ein kleines Problem:
Code:

Hab eine Zählewenn Funktion in meinem VBA-Code und würde gerne den Bereich dynamisch halten. Dafür ermittelte ich die letzte Zelle:
Code:

Das funktioniert auch, aber ich kann die Variable nicht in mein:
ActiveCell.FormulaR1C1 = "=COUNTIF(R2C3:R5000C3,RC[-6])"
einbauen.

Hab es mit:
COUNTIF(R2C3:R &LastCellSx&C3,RC[-6])
versucht, aber leider klappt es nicht. Wäre super wenn Ihr mir helfen könntet. Danke.

Das funktioniert aber:
Code:

Sonnige Grüsse aus der Schweiz

:)

 

Hi,

weshalb arbeitest du mit .FormulaR1C1? Einfacher ist es doch, wenn du .Formula verwendest, dann kannst du die Zelladressen ganz normal in der Range/Cells-Schreibweise benutzen.

 

\@Beverly

Erstmal danke für die Antwort. Ich wüsste beim "Formular" z.B. nicht, wie ich den Zellen Bereich fixieren kann (in Excel mit $), bei r1c1 aber schon. Wenn du mir da helfen könntest, würde ich natürlich Formular nutzen, muss da nicht umbedingt R1C1 nutzen. Danke

 

Hi,

nicht .Formular sondern .Formula

Auf diesem Weg:

Code:

 

Hi Beverly

mit deinem Befehl:
Range("I2").Formula = "=COUNTIF($C$2:$C$5000," & Cells(lngZeile, intSpalte).Address(False, False) & ")"

Hab ich den Bereich aber nicht dynamisch. Ich weiß vorab nicht, ob der Bereich bis C5000 geht (dafür ermittelt ich ja davor die letzte beschriebene Zelle). Vielleicht habe ich mich auch falsch ausgedrückt, aber ich würde gerne den ZählewennBereich dynamisch halten. Also mit C2 bis C(letzte Zelle).

Sowas zum Beispiel (funktioniert auch):
Range("A2:A" & LastCellSx&).SpecialCells(xlCellTypeVisible).EntireRow.Delete

Leider geht:
Range("I2").Formula = "=COUNTIF($C$2:$C$ & LastCellSx&, C2)"
nicht.

Oder habe ich dein Code Beispiel falsch verstanden?

LG

 

Moin
Da fehlen die Gaensepfoten;-)
"=COUNTIF($C$2:$C$" & LastCellSx & ", C2)"
gruss hary

 

Hi Hary

Danke *Smilie Kleiner Fehler der mir nicht aufgefallen ist. So kann ich jetzt meine Formel dynamisch halten.

Schönen Tag noch

LG
Karl

 

Mit etwas Überlegung hättest du selbst auf die folgende Lösung kommen können, denn das Prinzip der Dynamik war in meinem Code doch bereits vorgezeigt... *wink.gif*

Code: