Bezug auf Schrift Formatierung

Forumthread: Bezug auf Schrift Formatierung
3 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Bezug auf Schrift Formatierung

19.02.2005 09:22:45

Alex

Hallo,
wieder mal ein Problem zu dem ich im Archiv nichts finden kann.
Ist es möglich anhand der Schrift Formatierung einen Bezug zu erstellen?
D. h. zum Beispiel in Spalte B sind Zahlen angegeben, die in 3 unterschiedlichen Formationen (normal, kursiv und dick) eingetragen sind, nun alle normalen Zahlen zusammen fassen, die kursiven und die dicken?
Grüße
Alex

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Bezug auf Schrift Formatierung

=Peter=
=ZELLE.ZUORDNEN(20...

ransi
AW: =ZELLE.ZUORDNEN(20...

23.03.2005 20:49:14

Alexander

AW: Bezug auf Schrift Formatierung

=Peter=

Hallo Alex,
mit fett-formatierten Zellen geht es z.B. so:


Function Fettsumme(Bereich As Range)
'Quelle: Alois Eckl
Application.Volatile
Fettsumme = 0
For Each zelle In Bereich
If zelle.Font.Bold = True Then
Fettsumme = Fettsumme + zelle.Value
End If
Next
End Function

Du kannst Du mit der Funktion =Fettsumme(A1:A100) alle fett formatierten
Zellen aufaddieren. Diese Funktion einfach in ein Modul eintragen.
HTH
Gruss
Peter

=ZELLE.ZUORDNEN(20...

ransi

hallo alex
schau mal hier:
da stehen dir mit summenprodukt() oder teilergebniss() alle türen offen.
https://www.herber.de/bbs/user/18321.xls
ransi

AW: =ZELLE.ZUORDNEN(20...

23.03.2005 20:49:14

Alexander

Hallo,
schuldigung das ich mich nicht mehr bedankt habe, aber das Excel Programm hat mich so mitgenommen, ich bastle und schreibe Befehle, ich sollte das Programm vermarkten. *g*
So nun aber noch eine andere Dumme Frage, irgendwie finde ich keine Lösung:
If zelle.Font.Bold = True Then
oder auch
If zelle.Font.Italic = True Then
aber was ist mit Bold Italic? Wie ist hier der Befehl? Ich habe schon mehrere Möglichkeiten versucht, aber immer wieder eine Fehlermeldung, wie muß die Zeile heißen wenn ich fette Kursivschrift benutze?
Danke
Alex