Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1196to1200
1196to1200
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Anzahl der berechneten Zellen

Forumthread: Anzahl der berechneten Zellen

Anzahl der berechneten Zellen
Frank
Hallo Forum,
ich habe eine kurze Frage. Besteht die Möglichkeit, per Makro, sich die Anzahl der Zellen in der eine Berechnung stattfindet (aller Datenblätter einer Exceldatei) ausgeben zu lassen?
Vielen Dank und vielen Grüße,
Frank
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Anzahl der berechneten Zellen
07.02.2011 13:49:28
Eugen
Hallo Frank
Private Sub count_calc
Dim cell As Range, nCount As Integer, i As Integer
For i = 1 To Sheets.Count
For Each cell In Sheets(i).UsedRange
If InStr(cell.FormulaR1C1, "=") > 0 Then
nCount = nCount + 1
End If
Next cell
Next i
MsgBox Trim(Str(nCount)) + " Berechnungen gefunden !"
End Sub
Gruss
Eugen
Anzeige
AW: Anzahl der berechneten Zellen
07.02.2011 14:08:31
Frank
Hallo Eugen,
vielen Dank für die schnelle Unterstützung, das war genau mein Anliegen. Tolles Forum.
Vielen Dank und viele Grüße,
Frank

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige