Guten Tag
Ich habe leider ein Problem wo ich nicht mehr weiter weiß.
Ich habe eine Arbeitsmappe erstellt, die Daten aus einer anderen Datei in die Tabelle "Datenbank" mit aufgezeichneten Makro holt.
diese Daten werden in die Tabbelle "Fehlliste" zum bearbeitet übernommen.
Wenn in der Zelle A7 etwas steht, kann man in der Zelle B7 einen Wert setzten z. B.: A1, A2, A3, B etc
Wenn man A1 einträgt kann man unter C7 einen Text eingeben wie z.B.: aus R1-234567-8.9.
Die Zeile 7 wird dann zum auswerten auf die Tabelle "Auswertung" übernommen.
Wo zusammengerechtent wird, wie viele Zeilen haben in der Spalte B "A1" stehen.
Die Stückzahl und der Text werden dann in O10 zusammen geführt und mittels VBA in die Fußzeile der Tabelle "Fehlliste Neu" übernommen.
Dies kann ich mit sechs verschieden Bezeichnungen machen. N19 und N21 sind eigentlche fixe Texte, alle anderen ändern sich immer.
Jetzt habe ich nur ein Problem wenn ich in mehr als 3 bis 4 Zellen einen Text stehen habe, bekomme ich einen einen
Laufzeit '1004' Die RightFooter-Eigenschaften des PageSetup-Objektes kann nicht festgelegt werden.
Ab und zu ist es auch Center.Footer und LeftFooter. Wo habe ich da einen Fehler eingebaut.
In meinem Beispiel kann ich in 4 Zellen eine Text schreiben der übernommen wird, wenn ich in C15 noch etwas schreiben will, kommt der Fehler.
Der Code ist nur auf das Tabellenblatt bezogen.
https://www.herber.de/bbs/user/154130.xlsm
Habe leider mit VBA null Ahnung, hab das ganze eigenlich nur mit google hinbekommen.
Die Eigenschaften, wie Farbe, Fett und Zeilenumbruch würde ich gerne in der Fußzeile beibehalten, Schriftgröße wäre super wenn Sie nicht under 10 gehen würde,
weil sie Auskunft zur gefärbten Zelle geben.
Oder gibt es vieleicht eine andere Lösung für meine Problem?
bzw. wie schaffe ich es das es etwas schneller läde wenn ich auf das Tabellenblatt gehe und bringt man irgendwie auch die Null weg?
das es nur angezeigt wird wenn ein Text in der Zelle steht?
Danke für euer bemühen und eure Hilfe.
LG
Rene