Excel evtl. VB; Zeichen X zählen und Summe in eine extra Tabelle eintragen

Mitglied: lrt088

lrt088 (Level 1) - Jetzt verbinden

29.01.2007, aktualisiert 01.02.2007, 14804 Aufrufe, 9 Kommentare

Mehrere Excel Dateien, die jeweils ein oder mehrere X-Zeichen enthalten kann, auf 72 Zellen verteilt.

Hallo,

Datei1 hat eine Tabelle mit 72 Zellen
Datei2 hat eine Tabelle mit 72 Zellen
...

Es soll gezählt und aufgelistet werden, wie viele X bei allen Dateien in der Zelle 1, Zelle 2, ... enthalten sind. Ergebnis in einer neuen Tabelle ausgeben.
neue Tabelle:
Zelle 1 = 12
Zelle 2 = 44
...

Ich bin da noch recht unerfahren. Wäre froh, wenn man mir helfen könnte. Tipps, Anregungen...
Freundlich grüßt
lrt0088
Mitglied: Biber
29.01.2007 um 16:55 Uhr
Moin lrt088,

willkommen im Forum.

Vermutlich hat so lange keine/r auf Deine Frage geantwortet, weil noch eine wesentliche Detailangabe fehlt.
[Oder weil noch alle Lachtränen in den Augen haben wegen der ersten M$-Vi$ta-Feedbacks...]

JHowever, was mir fehlt, um eine sinnvolle Strategie vorzuschlagen, ist die Info, ob es denn um namentlich bekannte (handverlesene) Dateien Datei1.xls, Datei2.xls etc handelt

-oder-
ob es denn täglich/stündlich wechselnde Dateien mit "zufälligen" Dateinamen z.B. aus einem Log-Verzeichnis handelt.

Im ersten Fall (jede Datei ist einzeln anzugeben und angegeben), dann würde ich eine einfache neue Summentabelle aufmachen, in der von Hand jeweils die Formel eingetragen wird:
=ZÄHLENWENN([Datei1.xls]!Mappe1.A:Datei1.xls]!Mappe1.A;"*X*")
-bzw- für Sparsame
=ZÄHLENWENN([Datei1.xls]!Mappe1.A1:Datei1.xls]!Mappe1.A72;"*X*")

...diese Formel in die erste Zeile (da sollte dann in Deinem Beispiel 12 herauskommen) usw.

Im zweiten Fall (namentlich nicht bekannte Dateien) wäre der Weg über ein kleines Makro sinnvoller... geleiches Schema, nur dass das ZÄHLENWENN() auf neudeutsch COUNTIF() heißt.

Gruß
Biber
[Edit]...nach bastla's Kommentar..
Sorry, ich hatte es so interpretiert, dass pro Zeile in Spalte A ein oder eben kein Zeichen "x" vorhanden ist...
Die ZÄHLENWENN()-Funktion mit obiger Syntax zählt entsprechend nur die Anzahl Zeilen, die ein "X" enthalten.
[/Edit]
Bitte warten ..
Mitglied: bastla
29.01.2007 um 17:01 Uhr
Hallo lrt0088 und willkommen im Forum!

Damit ich Dich richtig verstehe: In den Zellen A1:A72 jeder Datei befindet sich eine jeweils unterschiedliche Anzahl von "X" (aber keine anderen Zeichen). In einer anderen Datei soll eine Tabelle für jede der Dateien in einer Spalte (also A1:A72 für Datei1, B1:B72 für Datei2) die Anzahl der "X" angeben - richtig?

Sofern diese Annahmen zutreffen, könntest Du folgende Formel verwenden (für alle Zeilen kopieren; analog für "Datei2"):
HTH
bastla

[Edit] @Biber - gehöre wohl auch schon zu den "älteren Leuten" ... [/Edit]
Bitte warten ..
Mitglied: lrt088
30.01.2007 um 08:57 Uhr
Hallo biber,
hallo bastla,

vielen Dank für das schnelle Antworten. Die X Zeichen werden von Hand eingetragen, Bewertungsbogen. (1. Hat dir die Freizeit gefallen? sehr gut/gut/befriedigend/... // 2. dfghj? sehr gut/gut/befriedigend/...)

Der erste Teil:
Es gibt insgesamt 72 Zellen, die in jeder Datei die gleiche Position haben und entweder leer sind oder ein X enthalten. (die Fragen stehen in anderen Zelle)

Die Ergebnistabelle:
In einer neuen Datei soll eine Tabelle erstellt werden, die mir sagen kann, wie viele X Zeichen in der Zelle A1 in allen Dateien stehen. Wie viele X Zeichen stehen in der Zelle B1 in allen Dateien? D.h. in der neuen Tabelle soll die Summe angezeigt werden. z.B. zur ersten Frage haben 15 Personen bei "sehr gut" ein X eingetragen.

Hoffentlich habe ich es jetzt besser erklärt

Grüße
lrt088
Bitte warten ..
Mitglied: bastla
30.01.2007 um 17:05 Uhr
Hallo lrt088!

Vielleicht vorweg eine Vorgangsweise, die ich in dieser Situation wählen würde (obwohl ich versucht hätte, gar nicht erst in diese Situation zu kommen ):

Als ersten und wichtigsten Schritt würde ich alle Bewertungen in einem Blatt zusammenzufassen, wobei ich aus den Spalten Zeilen (Datensätze) erzeugen und jedes "X" durch die Zahl 1 ersetzen würde.
Durch das Zusammenfassen vereinfacht sich eine ev weitere Auswertung (zB: sind genug Fragen beantwortet, um diesen "Fragebogen" überhaupt als valide anzuerkennen, oder sollte er besser aussortiert werden; gibt es Zusammenhänge zwischen den Antworten auf Frage 2 und 7; ...), und ich könnte auch eine große Menge an "Fragebögen" erfassen (bis Office 2003 hat Excel ja nur 256 Spalten pro Tabellenblatt). Außerdem könnte dann auch ein Export in eine Datenbank Deiner Wahl erfolgen.

Das Umwandeln von "X" in 1 ermöglicht das Berechnen einfacher Anzahlen (wie von Dir ursprünglich gewünscht) sogar per "SUMME" (ansonsten gäbe es auch "SUMMENPRODUKT" bzw "Array"-Formeln).

Ein entsprechendes VBA-Programm (Makro) könnte so aussehen:
Vorgangsweise:

Sammle alle Einzeldateien in einem gemeinsamen Ordner (im Beispiel oben "Z:\Fragebogendateien").

Erstelle eine neue Excel-Datei "Zusammenfassung.xls" und speichere diese nicht im gleichen Ordner wie die Einzeldateien.

Gehe mit Alt-F11 in den VBA-Editor, doppelklicke im Projekt-Explorer (links oben) auf "Diese Arbeitsmappe" und füge den oben stehenden Code ein.

Passe die beiden markierten Positionen an Deine Gegebenheiten an.

Setze den Cursor auf die Zeile "Const ..." und drücke die blaue "Play"-Taste in der Symbolleiste (oder die Taste F5).

Nachdem alle Dateien bearbeitet wurden, erhältst Du den Hinweis "Fertig."

Danach findest Du in der Zusammenfassungsdatei Deine einzelnen Datenspalten als Zeilen wieder (Zeile 1 sollte frei sein - dort kannst Du eine lfd Nummer von 1 - 72 unterbringen; vielleicht fügst Du nach dieser "Überschrift" noch eine Leerzeile ein (damit beim n#chsten Schritt nicht irrtümlich die Nummer mitgerechnet wird).

Jetzt kannst Du durch Summierung die Anzahl der ursprünglichen "X" in den einzelnen Spalten bestimmen.

Falls Dir diese Vorgangsweise nicht zusagt, bitte um Rückmeldung.

Grüße
bastla
Bitte warten ..
Mitglied: lrt088
31.01.2007 um 13:54 Uhr
Hallo bastla,

ich bin noch mit dem Verstehen Deiner Antwort beschäftigt . Jedenfalls sieht die Struktur des Fragebogens so aus:

Zelle A10 = Frage 1
Zelle A11 = Sehr gut
Zelle B11 = X oder leer
Zelle C11 = Gut
Zelle D11 = X oder leer
Zelle E11 = Befriedigend
Zelle F11 = X oder leer
usw.

Zelle A13 = Frage 2
Zelle A14 = Sehr gut
Zelle B14 = X oder leer
Zelle C14 = Gut
Zelle D14 = X oder leer
Zelle E14 = Befriedigend
Zelle F14 = X oder leer
usw.

- die Summe, wieviele z.B. auf die Frage 1 ein X bei "gut" gesetzt haben, ist das Hauptziel

- wieviele Fragen und welche Fragen unbeantwortet blieben wäre schön, wenn dies in der Ergebnis-Datei auch mit angezeigt werden könnte

- das Ergebnis braucht in keine Datenbank

- Zusammenhänge zwischen den Antworten der Fragen braucht nicht berücksichtigt werden

Grüße
lrt088
Bitte warten ..
Mitglied: bastla
31.01.2007 um 14:29 Uhr
Hallo lrt088!

Da hatte ich Dich falsch interpretiert, da ich angenommen hatte, alle "Antwort"-Zellen stünden untereinander und würden nur ein "X" (oder vielleicht auch "x") für "ja" enthalten oder bei einem "nein" leer geblieben sein ...

Außerdem war ich von nur einem "Fragebogen" je Datei ausgegangen (so als hätte jede/r Befragte eine eigene Datei erhalten und diese "ausgefüllt" retourniert).
Jetzt sieht es für mich so aus, dass also je Datei die Zellen B11, B14, B17, ... , B224 und analog die Spalten D, F, H, J, L die Ergebnisse enthalten - richtig? Ist sicher gestellt, dass diese Zellen nur entweder leer oder mit "X" gefüllt sind, oder soll angenommen werden, dass jede nicht leere Zelle als "angekreuzt "gilt?

Falls ich das richtig erfasst habe, als neuer Vorschlag:
Ergebnisdatei mit je einer Zeile pro Antwortdatei, in Spalte A (als Rückbezug) der Dateiname, ab Spalte B 72 Zellen mit den Antworten (auf 72 Fragen) in numerischer Form, also 0 für "nicht beantwortet", 1 für "Sehr gut", ... Bei Mehrfachantworten wäre dann der Inhalt zB 34 (diese Zellen ließen sich danach per "Bedingter Formatierung" sehr leicht farblich kennzeichnen - die Zellen mit Inhalt 0 natürlich ebenso).

Die Auswertung könnte danach mit "ZÄHLENWENN" erfolgen, um spaltenweise die Häufigkeiten feststellen zu können.

Soll ich auf dieser Basis einen Versuch machen?

Grüße
bastla

[Edit] Zelladressen B11, B14, ... korrigiert [/Edit]
Bitte warten ..
Mitglied: lrt088
31.01.2007 um 16:17 Uhr
Hallo bastla,

sorry, ich hätte das gleich genau sagen müssen.

Zitat:
"Außerdem war ich von nur einem "Fragebogen" je Datei ausgegangen (so als hätte jede/r Befragte eine eigene Datei erhalten und diese "ausgefüllt" retourniert)."

- das ist richtig

Zitat:
"Jetzt sieht es für mich so aus, dass also je Datei die Zellen B11, B14, B17, ... , B224 und analog die Spalten D, F, H, J, L die Ergebnisse enthalten - richtig?"

- ja, pro Frage gibt es 6 Antworten zur Auswahl. Nur eine darf man wählen.

Zitat:
"Ist sicher gestellt, dass diese Zellen nur entweder leer oder mit "X" gefüllt sind, oder soll angenommen werden, dass jede nicht leere Zelle als "angekreuzt "gilt?"

- Falsches auswählen ist möglich. wenn man die falsch ausgefüllten Fragen markieren kann, wäre das natürlich noch einen Schritt edler. Bevor es dir zuviel wird, lass es weg.

Zuerst waren es 12 Fragen, jetzt sind es 20 Fragen. Mehr wird es nicht. Pro Fragen 6 Antwortmöglichkeiten = 120 Zellen, die entweder X oder leer sind.

Ich bin wirkliche gespannt, wie so etwas in VBA oder Excel Formel aussieht.

Grüße
lrt088
Bitte warten ..
Mitglied: bastla
31.01.2007 um 16:33 Uhr
Hallo lrt088!

Ich hatte schon auf Verdacht ein wenig mit folgendem Ergebnis experimentiert:
In dieser Fassung werden alle Bewertungszellen, die nicht leer sind, gezählt (auch wenn Dir jemand ein "U" für ein "X" vorgemacht haben sollte ).

Die jeweiligen Anzahlen (von "0" für nicht beantwortet bis "7" für Mehrfachantwort) werden eingetragen und zur Kontrolle werden alle Anzahlen addiert - diese Summe müsste in jeder Spalte mit der Zahl der Fragebögen übereinstimmen.

Die Beschreibung der Vorgangsweise (siehe oben) zur Verwendung des Programms (bis "Fertig.") gilt weiterhin.

Grüße
bastla
Bitte warten ..
Mitglied: lrt088
01.02.2007 um 13:10 Uhr
Hallo bastla,

ich bin noch dabei das auszuprobieren. Das dauert noch

Vielen Dank!!

Grüße
lrt088
Bitte warten ..
Heiß diskutierte Inhalte
Benchmarks
M.2 SSD und RAM zu langsam
solved MarkowitschQuestionBenchmarks22 Comments

Hallo zusammen, ich habe mir folgenden PC zusammengestellt : MB: ASUS - ROG Strix Z490-E Gaming Mainboard (90MB12P0-M0EAY0) CPU: ...

Databases
SQL Null Abfrage
solved newit1QuestionDatabases18 Comments

Hallo zusammen, ich versuche eine CSV in meine Datenbank zu importieren. Das klappt auch. Die CSV hat folgendes Format: ...

Routers & Routing
OPNSense statt Endian Firewall
hannes.hutmacherQuestionRouters & Routing14 Comments

Hallo zusammen, wir setzen hinter der pfSense, die die direkt am Internet hängt, noch eine Endian Firewall ein. Dazwischen ...

Peripherals
Suchen Outdoor Wandler von LWL auf Cat 7 Kabel
solved pavelruQuestionPeripherals13 Comments

Hallo Zusammen, wir suchen einen Outdoor Konverter welcher von einem kommenden LWL Kabel auf CAT 7 Lan Kabel weiter ...

Windows 10
Amazon-Werbung im MS Edge Chromium
emeriksQuestionWindows 1012 Comments

Hi, habe hier ein Win10 Pro. Seit ca. 2-3 Wochen habe ich gelegentlich den Effekt, dass beim Suchen im ...

Routers & Routing
VPN mit zweiter Fritzbox hinter einer 7590
Eagle69QuestionRouters & Routing11 Comments

Hallo zusammen, ich habe folgendes Problem. Auf der einen Seite steht ein Router von Bintec, dass Model BI.IP+ (vergleichbar ...

Ähnliche Inhalte
VB for Applications
Excel Inputbox Zahl 0 eingeben
gelöst semperFrageVB for Applications2 Kommentare

Hey Leute, Ich habe das Problem und hoffe das mir jemand weiterhelfen kann. Ich schreibe Zahlen in eine Inputbox ...

VB for Applications
VB Skript Excel Datei
gelöst FragerFrageVB for Applications3 Kommentare

Hallo Zusammen, Ich brauche eure Hilfe. Ich habe eine Datei 1.xlsx nun brauche ich ein Skript, was die Datei ...

Microsoft Office

Outlook 2013 - Excel Anhang durchsuchen nach Zahl

schoenengutentagFrageMicrosoft Office18 Kommentare

Hallo, besteht irgendwie die Möglichkeit in Outlook die Inhalte der Excelanhänge zu durchsuchen? Text wird in den Excelanhängen richtig ...

Microsoft Office

Excel 2013 Zahl aus einem String auslesen

DerSkipperFrageMicrosoft Office3 Kommentare

Hallo zusammen. für eine Reorg in der Firma ändern sich die Nummern aller OE-Einheiten in allen Hierarchien. Ebenso sollen ...

Microsoft Office

Excel, Zahl in Zelle, anderen Werte addieren

gelöst wusa88FrageMicrosoft Office5 Kommentare

Hallo Zusammen, der Titel ist schwierig zu wählen, aber ich versuche zu erklären, was ich vorhabe. Hier mal ein ...

Microsoft Office

Suchen mit 2 Werten (x,y) in einer Tabell - Bereich.vergleich gibt nur Wahr oder Falsch aus

gelöst ArafatFrageMicrosoft Office2 Kommentare

Hallo Zusammen, ich suche in einem 2. Tabellenbatt nach über 2 Werte x und y nach einem 3. Wert. ...

Neue Fragen
Administrator Magazin
11 | 2020 Virtualisierung ist aus der IT nicht mehr wegzudenken. In der November-Ausgabe des IT-Administrator Magazins dreht sich der Schwerpunkt um das Thema "Server- und Storage-Virtualisierung". Darin erfahren Sie, wie sich die Virtualisierungstechnologie entwickelt hat, welche Varianten es im Bereich Server und Speicher gibt und wie ...
Neue Beiträge
Neue Jobangebote
Server- und Storage-VirtualisierungServer- und Storage-VirtualisierungBerechtigungs- und IdentitätsmanagementBerechtigungs- und IdentitätsmanagementWebdienste und -serverWebdienste und -serverDatenbankenDatenbankenMonitoring & SupportMonitoring & SupportHybrid CloudHybrid Cloud