Hallo!
Ich habe eine Exceldatei, mit der ich mittels VBA ein Tabellenblatt einer anderen Exceldatei (Ergebnisse einer Prüfung) auf ein Tabelleblatt reinkopiere und dann damit arbeite.
Die Datei, die die Testergebnisse enthält sieht folgendermaßen aus: 1. Zeile Überschrift, dann Zeilenweise die KandidatInnen mit den Ergebnissen, wobei die ersten 9 Spalten Infos sind und erst ab der 10. Spalte Ergebnisse in Form von Punken für die jeweilige Frage stehen.
Diese Zahlen sind als Text gespeichert, womit ich natürlich nicht rechnen kann (zumindest nicht die SUM Funktion verwenden kann). Ich habe versucht sie umzuformatieren (auf gefühlt 10 verschiedene Arten), was mir nie gelungen ist. Ich habe immer schon bei der Auswahl der Range eine Fehlermeldung bekommen. Also habe ich erstmal nur versucht eine einzelne Zelle umzuformatieren (mit der gefühlt einfachsten Version überhaupt) mittels:
Worksheets(b).Cells(2, 10).Value = Worksheets(b).Cells(2, 10).Value * 1
Worksheets(b).Cells(2, 11).Value = Worksheets(b).Cells(2, 11).Value * 1
Worksheets(b).Cells(3, 10).Value = Worksheets(b).Cells(3, 10).Value * 1
Worksheets(b).Cells(3, 11).Value = Worksheets(b).Cells(3, 11).Value * 1
(wobei b ein str ist)
Interessanterweise sind jetzt die Zahlen in den Zellen J5, K5, J10 und K10 als Zahl gespeichert (obwohl ja eigentlich J2, K2, J3 und K3 angesprochen wurden), der Rest noch als Text.
Vermutlich übersehe ich irgendwo etwas, aber ich sehe einfach nicht was! Würde mich echt über Hilfe freuen!
Danke schonmal!
LG,
Johanna
PS: Mein Programm hat bis jetzt immer reibungslos funktioniert. Ich wollte nur die "Umwandlung" reinprogrammieren, da Moodle seit dem letzten Update auch die Zahlen als Text speichert (anstatt als Zahl wie bisher), wenn man sich das Ergebnis als xlsx Datei herunterladen möchte.