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

Wieviel der Tabelle ist ausgefüllt ?

Forumthread: Wieviel der Tabelle ist ausgefüllt ?

Wieviel der Tabelle ist ausgefüllt ?
Silke
Hallo Excellaner
ich habe ein kleines Problem, ich möchte wissen, wieviel Prozent in einer Tabelle ausglelastet ist, z. B. habe ich die Spalte A - G beschrieben, einige der Zellen auf diesen Spalten sind aber noch frei, nun möchte ich wissen wieviele Zellen beschrieben sind und wieviele frei, und dieses auch in Prozent umgerechnet. Dabei soll es aber so sein das nur bis zur letzten Zeile gerechnet wird wo auch Daten geschrieben stehen, soll heissen wenn ich 3000 Datensätze geschrieben habe, darf er alles Zeile 3001 nicht mehr in das Ergebnis aufnehmen. Ich hoffe ich habe mich verständlich ausgedrückt
Gruss
Silke
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wieviel der Tabelle ist ausgefüllt ?
P@ulchen
Hi Silke,
probier mal das hier (irgendwo einen Wert eingeben):
https://www.herber.de/bbs/user/5792.xls

P@ulchen
Das Forum lebt auch von den Rückmeldungen !
Anzeige
Berichtigung
P@ulchen
Sorry, Fehler im Code Sub Letzte()...
Richtig: xPro = 100 * x / y

P@ulchen
Das Forum lebt auch von den Rückmeldungen !
Anzeige
AW: Wieviel der Tabelle ist ausgefüllt ?
ChrisL
Hi Silke
Willst du Zeilen oder Zellen auswerten? Angenommen in Zeile 1 Spalte A:F ist leer, aber G1 hat einen Eintrag, wie wäre dies zu werten.
Ist A1:G3000 effektiv der benutzte Bereich, oder hast du allenfalls z.B. in J3010 auch noch Daten?
Willst du das Ergebnis als Formel oder per Makro.
Gibt es noch Titelzeilen, die nicht berücksichtigt werden sollen.
Gruss
Chris
Anzeige
AW: Wieviel der Tabelle ist ausgefüllt ?
Stephan
Könnte zum Beispiel so aussehen:

Sub AusgefuelltProzent()
Dim Zelle As Range
LetzteZeile = 1
For Spalte = 1 To 7
If Cells(65536, Spalte).End(xlUp).Row > LetzteZeile Then
LetzteZeile = Cells(65536, Spalte).End(xlUp).Row
End If
Next Spalte
AnzahlZellen = Range("a1", Cells(LetzteZeile, 6)).Count
LeereZellen = 0
For Each Zelle In Range("a1", Cells(LetzteZeile, 6))
If IsEmpty(Zelle) Then
LeereZellen = LeereZellen + 1
End If
Next Zelle
Ausgefuellt = (AnzahlZellen - LeereZellen) / AnzahlZellen * 100
MsgBox Ausgefuellt & " % sind gefuellt"
End Sub

Gruß,
Stephan.
Anzeige
Matrixlösung
IngoG
Hall Silke,
folgende Matrixformel funzt zwar, ist aber etwas träge...
=ANZAHL2(A:G)/MAX(ZEILE(A:A)*(ZÄHLENWENN(INDIREKT("A"&ZEILE(A:A)&":g"&ZEILE(A:A));"&lt&gt")&gt0)*7)
Eingabe abschließen mit strg-shift-enter
sollte mir noch eine optimierung einfallen melde ich mich nochmal
Gruß Ingo
PS eine Rückmeldung wäre nett...
Anzeige
AW: Matrixlösung
01.05.2004 23:29:15
Silke
HAllo ich danke allen die mir geholfen haben
Gruss
Silke
AW: Matrixlösung
01.05.2004 23:29:21
Silke
HAllo ich danke allen die mir geholfen haben
Gruss
Silke
Anzeige
Anzeige

Infobox / Tutorial

Wieviel Prozent ist die Tabelle ausgefüllt?

Schritt-für-Schritt-Anleitung

Um herauszufinden, wieviel Prozent einer Excel-Tabelle ausgefüllt ist, kannst du die folgende Schritt-für-Schritt-Anleitung nutzen. Diese Anleitung ist für Excel-Versionen ab 2010 geeignet.

  1. Öffne deine Excel-Tabelle und stelle sicher, dass du die Daten in den Spalten A bis G hast.

  2. Öffne den VBA-Editor: Drücke ALT + F11.

  3. Einfügen eines Moduls:

    • Klicke im Menü auf "Einfügen" und wähle "Modul".

  4. Kopiere den folgenden Code in das Modul:

    Sub AusgefuelltProzent()
   Dim Zelle As Range
   Dim LetzteZeile As Long
   LetzteZeile = 1
   For Spalte = 1 To 7
       If Cells(65536, Spalte).End(xlUp).Row > LetzteZeile Then
           LetzteZeile = Cells(65536, Spalte).End(xlUp).Row
       End If
   Next Spalte
   Dim AnzahlZellen As Long
   AnzahlZellen = Range("A1", Cells(LetzteZeile, 6)).Count
   Dim LeereZellen As Long
   LeereZellen = 0
   For Each Zelle In Range("A1", Cells(LetzteZeile, 6))
       If IsEmpty(Zelle) Then
           LeereZellen = LeereZellen + 1
       End If
   Next Zelle
   Dim Ausgefuellt As Double
   Ausgefuellt = (AnzahlZellen - LeereZellen) / AnzahlZellen * 100
   MsgBox Ausgefuellt & " % sind gefüllt"
End Sub

  5. Führe das Makro aus: Schließe den VBA-Editor und drücke ALT + F8, um das Makro auszuwählen und zu starten.

Häufige Fehler und Lösungen

  • Makro funktioniert nicht: Stelle sicher, dass Makros in deiner Excel-Anwendung aktiviert sind. Gehe zu "Datei" > "Optionen" > "Sicherheitscenter" > "Einstellungen für das Sicherheitscenter" und aktiviere Makros.

  • Falsche Ergebnisse: Überprüfe, ob du die richtigen Spalten (A bis G) und den richtigen Bereich für deine Daten verwendet hast.

Alternative Methoden

Eine einfache Möglichkeit, den Füllstand einer Tabelle zu berechnen, ist die Verwendung von Excel-Formeln:

  1. Verwende die Formel für die Anzahl ausgefüllter Zellen:

    =ANZAHL2(A1:G3000)/ANZAHL(A1:G3000) * 100

  2. Matrixformel: Eine andere Methode ist die Verwendung einer Matrixformel:

    =ANZAHL2(A:G)/MAX(ZEILE(A:A)*(ZÄHLENWENN(INDIREKT("A"&ZEILE(A:A)&":G"&ZEILE(A:A));"<>"&"")>0)*7)

    Drücke STRG + SHIFT + ENTER, um die Formel zu aktivieren.

Praktische Beispiele

  • Beispiel 1: Wenn du in den Zellen A1 bis G3000 insgesamt 1500 ausgefüllte Zellen hast, dann wird die Formel =ANZAHL2(A1:G3000)/ANZAHL(A1:G3000) * 100 ein Ergebnis von 50% ausgeben.

  • Beispiel 2: Mit dem VBA-Skript kannst du einfach den Füllstand deiner Tabelle abfragen, indem du das Makro ausführst, und eine Nachricht mit dem Prozentsatz der ausgefüllten Zellen erhältst.

Tipps für Profis

  • Optimierung des VBA-Codes: Achte darauf, die Berechnung nur auf die benötigten Spalten zu beschränken, um die Ausführung zu beschleunigen.

  • Datenvalidierung: Implementiere Datenvalidierung in deinen Zellen, um sicherzustellen, dass nur die gewünschten Werte eingegeben werden.

FAQ: Häufige Fragen

1. Frage
Wie kann ich die Formel anpassen, wenn ich andere Spalten habe?
Du kannst einfach die Bereiche in den Formeln oder im VBA-Code anpassen, indem du die Spaltenbezeichnungen änderst.

2. Frage
Kann ich die Ergebnisse auch grafisch darstellen?
Ja, du kannst Diagramme in Excel verwenden, um die Verteilung der ausgefüllten und leeren Zellen visuell darzustellen, indem du die Prozentsätze in ein Diagramm überträgst.

Beliebteste Forumthreads (12 Monate)

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