Office: Makro für Standardabweichung

Hallo Leute,

ich habe ein dringendes Problem und nach kurzer Suche, die ich nicht genau eingrenzen konnte kein Lösung gefunden.

Ich würde gern ein Makro für eine Standardabweichung erstellen. Das klappt mit der Aufzeichnungsfunktion auch ganz gut aber ich bekomme dann immer ein solches Ergebnis dafür im Makro.

In der Normalen Exceltabelle würde das Ganze dann so aussehen.

Mein Problem ist jetzt aber, dass ich die Standardabeichung sehr oft per Hand anpassen muss, da es sich in einem sehr großen Makro befindet aber ich kann mit diesen Werten (R[-35]C[16] überhaupt nichts anfangen. Wieso kann da Excel nicht einfach die richtigen Tabellen ID´s schreiben also eben in diesem Bsp. Q2.
Ich hoffe mal das war jetzt nicht zu kompliziert erklärt. Im Grunde bräuchte ich nur einen Tip, wie ich genau die Standardabweichung per Hand in das Makro eintragen kann ohne diese kryptischen Bezeichnungen für die Tabellen-ID.
Vielen Dank im voraus für evtl. Tips.

 

Hallo!

"=STDEV(Q2:Q9)" sollte als manueller Eintrag reichen.

(Die kryptische Darstellung kommt daher, dass du während der Aufzeichnung offensichtlich die Zelle A37 aktiviert hattest und Excel nun einen relativen Bezug zu dieser Zelle herstellt: 35 Zeilen nach oben und 16 Spalten nach rechts (ergibt Q2) bzw. 28 Zeilen nach oben und 16 Spalten nach rechts (ergibt Q9).)

 

Danke für den Tip, das hatte ich auch schon einmal probiert aber dann bekomme ich folgenden Wert in der Exceltabelle. Durch diese Apostrophe funktioniert das ganze dann leider nicht.

Code:

=STABW('Q2':'Q9')

Ich poste mal die komplette Zeile in Excel, nachdem ich sie deinem Tip angepasst habe. Hat das etwas mit dieser FormulaR1C1 zu tun?

Code:

Range("E38").Select
ActiveCell.FormulaR1C1 = "=STDEV(Q2:Q9)"

 

Hallo!

Probier mal

Code:

'Range("E38").Select   (kann weg)
Range("E38").Formula = "=STDEV(Q2:Q9)"

Wenn du "Formula" durch "FormulaLocal" ersetzt, dann kannst du auch den deutschen Funktionsnamen (STABW) in VBA verwenden.

 

Juhu, das hat funktioniert. Vielen lieben Dank. :-D