Array-Formel funktioniert nicht - VBA-Lösung?
21.11.2012 07:50:22
martin
Als Neuling erstmal ein freundliches Hallo an alle. Ich bin neu hier und - natürlich - verzweifelt. Ich soll zur Probenarchivierung eine Excel-Tabelle erfinden, die zwei Dinge können soll:
1. Aus einer Nummer, den Initialen, einem Buchstaben und einer Zahl einen Code generieren. Das hab ich hin gekriegt. Die drei Bindestriche, auch wenn nichts eingetragen ist, stören etwas. Eine "wenn nichts eingetragen ist, schreib' keine drei Bindestriche in die Zelle"-Funktion wäre nett, aber kein Muss. Mein Problem:
2. Nachdem eine Spalte (Spalten F-M) markiert wurde (kleines x), soll die betreffende Zeile in diverse Sublisten (Tabellenblatt 1-14) übertragen werden. Ein mal soll die ganze Zeile übertragen werden, in zwei andere Sublisten jeweils nur Nummer, Name, Vorname, Patientennummer (also Spalte B-E der Zeile).
Da wollte ich mich einer Array-Formel bedienen. Das ging auch ganz gut, anfangs, aber bei genauerem Hinsehen fällt auf, es klappt nicht. Es werden nicht alle übertragen. Bspw. sind 14 Zeilen bei "Sonstige" markiert, es werden aber nur 11 in die entsprechende Subliste übertragen. Und ich versteh einfach nicht warum. Ich habe - ziemlich stümperhaft - einfach überall die Ausgangsformel hin kopiert. Es müsste überall das gleich drin stehen und somit auch kopiert werden.
Das Trauerspiel ist bei allen Sublisten zu finden. Keine übernimmt vollständig alle markierten Zeilen aus Tabelle1 (Probensammlung). Wie gesagt, es ist zum verrück werden.
Dabei ist die ganze Tabelle inzwischen etwas langsam geworden. Wenn man in der Probensammlung etwas eingibt, hakt ein langsamer Rechner ganz schön. Vielleicht hat ja einer von Euch Profis eine Idee wo der Fehler ist, oder ob und wie man das mit einem Makro eleganter lösen könnte.
Eigentlich arbeite ich mit Excel 2010 und sitze gerade an einem Rechner, der nur 2003 hat. Aber daran kann es ja wohl nicht liegen. Lösungen dürfen daher gerne für 2007 aufwärts sein...
Ich habe die Datei mal hier hochgeladen: http://yourfiles.to/?d=005C8FDB46
Ich danke Euch vielmals im Voraus für Eure Hilfe!
finchi