Spalten unter Bedingung auf entsprechende Seite kopieren

[MaWeb]

Hey,


Danke soweit schonmal!

Könntest du bitte nochmal die "Bestellliste Automatisch" hochladen?
Beim öffnen tritt ein Fehler auf, das die Datei unlesbare Inhalte enthält.

Das Sortieren ist auch nicht ganz so einfach, wie ich es anfangs beschrieben hatte.

Die Stückzahlen (die werden erst errechnet und sind dann in der Spalte "Produkt")  dürfen nur addiert werden, wenn der Wert aus der Spalte "Dateiname" und der Wert aus Spalte "Konfiguration" gleich sind.
Ansonsten muss der Artikel in eine neue Zeile geschrieben werden.

Wenn der Wert "Dateiname" gleich ist, aber die "Konfiguration" unterschiedlich, sollte die Spalte direkt unter der dazugehörigen stehen.


Ich denke ich bin auch schon nah an der Lösung, nur "erkennt" das Programm nicht immer wenn die Werte gleich sind.


Der Fehler muss sich noch im letzten Sub (Sub Datenkopieren) befinden.

[Rabe]

Hi,

hier nochmal die automatische Bestelliste:

  Bestellliste Automatisch.xlsb (Größe: 48,03 KB / Downloads: 3)

Vor dem Hochladen geöffnet und gespeichert!

[MaWeb]

Hey,

eigenartig, der Fehler tritt weiterhin auf.

Nach dem Widerherstellen kommt eine Meldung mit entfernten Inhalten:

Entfernter Teil: Teil /xl/styles.bin. (Formatvorlagen)
Reparierte Datensätze: Zellinformationen von /xl/worksheets/sheet1.bin-Part
Reparierte Datensätze: Tabelle von /xl/tables/table1.bin-Part (Tabelle)

ist das ein Problem?

Wenn ich das Makro ausführe erstellt der die Tabellen aber abgesehen von den Spalten:
Anzahl, Stufe und Fertigungsart sind die Tabellen leer.

[Rabe]

Hi,

darum hatte ich geschrieben:

Den Rest des Makros habe ich so verändert, daß dann Deine 3 seitherigen Spalten übertragen werden. Das Übertragen der restlichen 10 Spalten ist noch nicht implementiert, da ich immer Schwierigkeiten habe, eine Arrayprogrammierung zu verstehen und nachzuvollziehen/anzupassen/zu erweitern.

da muß ein VBA-Experte ran. Ich bin noch Anfänger.

Hier mal als xlsm:

  Bestellliste Automatisch.xlsm (Größe: 48,27 KB / Downloads: 0)

Was mir auffällt: Du verwendest ein 11 Jahre altes Excel! Das kann sein, daß das nicht alle Funktionen von 2013 kennt.