Hallo zusammen, habe hier ein dickes Problem und zwar geht es um die Summe (minus) Fett. Wenn ich eine Zahl in einer Celle Fett markiere und im Anschluss die Taste F9 drücke, so wird die Zahl vom ergebnis abgezogen, was auch richtig ist. Jedoch wenn ich zu einem anderen Tabellenblatt wechsle und irgendwo eine Zahl ändere, oder auch nur die Enter Taste drücke, komme ich sofort wieder zum ersten Tabellenblatt und der Kürser spinnt total. Schaut euch mal die Formel und auch den Code an. Ich denke es kann nur an dem VBA Code liegen. (es handelt sich hier im beispiel um E10 die 7 Fett)
Im voraus besten dank
WernerH
Option Explicit
'Summiert die Zellen in einem Bereich in dem die Schrift Fett-Formatiert wurde
'Funktionsaufruf =SummeFett(Bereich)
Function SummeFett(Bereich As Range) As Variant Dim i As Range Application.Volatile For Each i In Bereich.Cells If i.Font.Bold Then SummeFett = SummeFett + i End If Next End Function

Spiel-Schein Drucken

B C D E F G H I J K L 10 9 X 6 7 q j q 6 2. 7 47 Formeln der Tabelle L10 : {=SUMME(WENN(ISTFEHLER(WENN(CODE(B10:K10)>57;WERT(ZEICHEN(CODE(B10:K10)-57));WERT(ZEICHEN(CODE(B10:K10)))));0;WENN(CODE(B10:K10)>57;WERT(ZEICHEN(CODE(B10:K10)-57));WERT(ZEICHEN(CODE(B10:K10))))))-SUMMEFETT(B10:K10)}

Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download