Statusleiste anpassen

[theunknown]

Hallo liebe Excel-Community,

ist es möglich, sich unten in der Excel-Statusleiste (in der Mittelwert, Anzahl und SUmme steht)
auch z.B. den Bruttowert und Nettowert ausgeben zu lassen?

Bspw.
Brutto 7%:1,07   Brutto 19%:1,19   Netto 7%:0,93   Netto 19%:0,84   Anzahl:1   Summe:1

Notfalls auch als VBA Funktion für die aktive Arbeitsmappe, dass man die als Vorlage speichern kann.

Vielen Dank schon einmal im Voraus für die Antworten :)
Steffi

[Jonas0806]

Hallo Steffi,

sollte so funktionieren. Für alle anderen Werte analog

PHP-Code:

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Application.StatusBar = "Brutto 7%: " & WorksheetFunction.Sum(Selection) * 1.07
End Sub 


[theunknown]

Supi, vielen Dank

Erst rechts geschaut, da steht nix, aber das steht links.

Vielen herzlichen Dank 

[theunknown]

Gibt es denn noch die Möglichkeit das Ganze auf zwei 
Stellen zu runden und als Zahl zu formatieren mit Tausenderpunkt? ^^

[schauan]

Hallöchen,


Sub test()
MsgBox Format(Round(12345.67, 1), "#,###.0")
End Sub

[theunknown]

Nein, mit dem Ansatz von Jonas, der war super :)

[RPP63]

Trotz Smilie!
Versuche doch einfach mal, Andrés Antwort zu verstehen.
Und dann drücke mal beherzt die Taste F1, wenn sich der Cursor innerhalb von Format() oder Round() befindet.

Gruß Ralf

[theunknown]

Herzliche Danke  :angel: