Hallo,
ich habe hier auf Arbeit ein Makro eines ausgeschiedenen Kollegens geerbt welches ich aktuell mehr schlecht als recht weiter bearbeite. Der Hintergrund ist folgender. Mittels eines anderen Makros werden Excel Sheets zur Dokumenation von Fehlern erzeugt. Dies wird mittels der Eingabe von "1" für iO und Buchstabenkürzel für niO getan. Aus diesem Ttabellenblatt wird dann per Makro (Userform2) ein Lieferschein erzeugt. Jetzt soll beim Erzeugen des Lieferscheins auf dem Tabellenblatt "LSxxxx" nur die Zellen mit "1" übetragen und Leerzeilen gelöscht werden. Zeitgleich soll der Inhalt der Tabelle "Intern" kopiert und unter der Tabelle eingefügt werden. Die obere Tabelle ist die EIngabemaske und in der unteren wird dokumentiert was schon auf Fehler geprüft wurde. Prinzipell funktioniert dies auch bei Tabellen wie "S4144.xxxxx", leider gibt es aber auch erzeugte Tabellenblätter wie "S4316xxxxx" wo dies nicht funktioniert. Problem dabei ist m.E. das der Code mittels Application.Match das Wort "Gutteile:" sucht und so die Eingabemaske kopiert. Da aber bei "S4316xxx" das Wort in einer Spalte mehrmals vorkommt läuft das Makro ins Leere.
Ich bitte um Hilfe komme einfach nicht weiter. Beide Mappen habe ich hochgeladen:
https://www.herber.de/bbs/user/127134.xlsm
https://www.herber.de/bbs/user/127135.xlsm
Besten Dank im Vorraus,
Philipp