Office: Wert aus Zelle B kopieren wenn in Spalte M ein X

Hallo und Moin Moin zusammen.

Ich versuche seit gestern ein Problem zu lösen nur leider bisher ohne Erfolg.

Ich möchte aus dem Tabellenblatt "Geräte Daten", wenn in Spalte M ein X steht, das der Wert aus Spalte A in der Zeile wo das X steht in das Tabellenblatt „Geräte Barcodes“ kopiert wird. Wenn dies geschehen ist soll das X in Spalte M gelöscht werden.

z.B.

In M7 steht ein X dann soll A7 in Tabellenblatt "Geräte Barcodes" kopiert werden und im Tabellenblatt "Geräte Daten" soll das X gelöscht werden. Es kann auch mehrmals passieren.
In M9 M23 und M32 je ein X dann kopiere B9 B23 und B32.

Ich habe es bereits mit folgender Formel versucht

Code:

Nur leider lammt Excel da voll ab und es dauert, bis ich weiterarbeiten kann. Daher wäre es mir am liebsten dies über einen Button zu machen.

Ich habe auch bereits in einem Forum um Rat gefragt nur bisher kein Ergebnis.



Ich hoffe hier kann mir geholfen werden.


Grüße und einen schönen Abend und bleibt alle Gesund.

Michael

:)

 

Wieso löst du das nicht über den Autofilter? Filter und mit Strg+C/Strg+V kopieren und einfügen.

 

Hallo Berni,

Da ich in der Mappe mit den Daten weitere Makros ausführe. z.B übergebe ich Daten an Word bzw. an einen Label-Drucker. Das Tabellenblatt "Geräte Barcodes" wurde im Label-Drucker auch als Datenbank hinterlegt.

Auch werden wenn ich unterwegs bin Daten eingtragen und da habe ich keinen Drucker mit um diese direkt zu drucken. Wenn ich dann zuhause bin brauch ich die Mappe nicht zu öfnen sondern kann es dirket mit der Drucker-Software machen.

Zerbreche mir da schon seit Tagen den Kopf und nun hängt es mehr oder weniger an diesen einem Teil.


Gruß Michael

 

Aber das beantwortet ja nicht meine Frage.

 

Hallo Berni,

es werden die Daten über UserForm eingegeben und es befinden sich auch Formeln in der Quell Tabelle. Ich möchte das die Daten kopiert werden, wenn die anderen Abläufe durchgelaufen sind. Es ist auch einfache das über einen Button zumachen da auch die Tabellen einen Schreibschutz haben. Somit würde das Kopieren nicht funktionieren da nur A1 nicht geschützt ist.

Es handelt sich nur eine Beispieldatei dort habe ich nicht alle Codes drin die eigentlich drin sein müssten.

Gerne versuche ich weitere Fragen zu beantworten.


Gruß Michael

 

Code:

 

Hallo Berni,

vielen Herzlichen Dank.

Zwei fragen habe ich da noch zu.

1. Wenn ich die Daten in der Zieldatei überschreiben möcht wie muss ich das machen?

2. Könntest Du mir den Code erklären wie wo was passiert? Ich möchte ja gerne verstehen wie wo was passiert, damit ich auch was dazu lernen kann.

Gruß Michael

 

Guten Morgen,

ich komme erst am Abend dazu, näher darauf zu antworten. Ich verstehe allerdings die erste Frage nicht. Wo willst du was überschreiben?

 

Hallo Berni,

Hatte sich schon erledigt mit dem Überschreiben


Gruß Michael

 

Ich habe da noch eine Frage zu einer Änderung.

Ist es möglich es so zumachen das er nur die Daten bis Zeile 49 ins Tabellenblatt "Geräte Barcodes" Spalte C kopiert. Falls es dann doch mal drüber gehen sollte von den Einträgen, die kopiert werden bzw. eingefügt werden . Eine Msgbox kommt und nach drücken auf OK der rest in Spalte F ab F2 einfügt.

1. Beispiel

Ich möchte 50 Einträge kopieren, wäre ja nicht möglich. Dann kopiert er die 48 Einträge in Spalte C, dann kommt eine Meldung mit drücken auf OK werden die anderen 2 Einträge in Spalte F kopiert.

2. Beispiel

Ich habe bereits zuvor 39 Einträge kopiert nun sollen nochmal 10 kopiert dazu kommen. Darf er ja nicht, sondern nur noch 9 Einträge in C und der rest in Spalte F .


Es dürfen nicht mehr als 48 Einträge in Spalte C vorhanden sein.

Gruß Michael

 

Möglich ist vieles. Worauf ich aber so gar keine Lust habe, sind Anfragen in Salamitaktikmanier.
Beschäftige dich mit Do Until Schleifen.

 

Hallo Berni,
ich entschuldige mich bei Dir wegen der ganzen Fehler. Leider leide ich unter einer Lese-, und Rechtschreibschwäche.

Darum habe ich es hier nochmals versucht besser zu beschreiben.

Ist es möglich so zumachen das die Daten nur bis Zeile 49 ins Tabellenblatt "Geräte Barcodes" Spalte C kopiert werden. Falls es doch mal mehr Einträgen sein sollten die kopiert bzw. eingefügt werden, soll eine Msgbox angezeigt werden. Nach einem klicken auf OK sollen die restlichen Einträge in Spalte F ab F2 einfügt.

1. Beispiel
Ich möchte 50 Einträge kopieren, wäre so nicht möglich. Dann kopiert er die ersten 48 Einträge in Spalte C, und die restlichen 2 Einträge in Spalte F.

2. Beispiel
Ich habe bereits 39 Einträge in Spalte C und nun sollen nochmal 10 dazu kopiert werden. Dürfte so nicht gehen. Es müssten dann 9 Einträge in Spalte C und die restlichen 9 Einträge in Spalte F kopiert werden.


Es dürfen nicht mehr als 48 Einträge in Spalte C vorhanden sein.

Gruß Michael

 

Hallo Michael,

da hast du mich missverstanden. Es ging mir nicht um etwaige Schreibfehler (von denen mir jetzt keine irgendwie besonders ins Auge gestochen wären, da gibt es ganz andere Kandidaten im Forum, die die deutsche Sprache vergenusswurzeln). Eine Entschuldigung dafür ist absolut unnötig!
Auch habe ich dein Anliegen schon verstanden, du hast es ausreichend gut beschrieben.

Mir ging es darum, dass ich es nicht mag, wenn Wünsche/Anforderungen an eine Lösung nach und nach präsentiert werden. Wieso hast du denn nicht von Anfang an geschrieben, dass maximal 48 Einträge je Spalte zulässig sind? Versuch bitte zu verstehen, dass es keinen Spaß macht, eine bereits erarbeitete Lösung wieder neu durchdenken zu müssen. Wie viel Freude würde dir das bereiten?

Also, es ist dahingehend alles von mir gesagt, daher Schwamm drüber. Kommen noch weitere Anforderungen, oder wäre es damit erledigt?
Wie viele Einträge können überhaupt maximal auftreten? 96? 1000? Und muss alle 48 Einträge 3 Spalten weiter gesprungen werden?

 

Hallo Berni,

OK dann habe ich Dich falsch verstanden.
Ich hatte einen Plan und soweit sah er für mich und mein können gut und einfach aus. Entwickelte sich aber umso näher ich meinte dem Ziel sein zu kommen zu einer Katastrophe.

Die Daten, die ich da rüber kopiere, werden auf Etiketten gedruckt. Pro Seite/Bogen maximal 48 Stück. Diese werden an eine Word-Datei übergeben. Pro Etikett werden die Daten wie folgt benötigt.
Einmal für den Barcode , dieser muss so übergeben werden, *123456*
Einmal um die Zahl unter den Barcode zuschreiben, 123456.
Soweit habe ich auch alles fertig und funktioniert.

Nun ist es mein Problem das so hin zu bekommen das eben nicht mehr wie 48 Einträge in Spalte C sein dürfen. Mit Spalte F dachte ich mir dies als Puffer, wenn es mehr wie 48 sind damit ich die auf das nächste Blatt/Bogen drucken kann. Ich möchte halt keine Etiketten verschwenden. Wenn es weniger sind ist es kein Problem nur wenn es dann an die 48 geht wird es wieder schwer.

Ich habe mir das alles viel einfacher vorgestellt und dachte mir mit dem was ich kann wird es schon irgendwie funktionieren. Naja, falsch gedacht.

Ich habe die Datei mit dem was ich bis jetzt habe und der Word-Datei hochgeladen. Ich habe auch alles etwas beschriftt wo wie was ist und macht.

Gruß Michael

 

Na dann ist es ja gut, dass du mir dein Vorhaben jetzt genau erklärt hast *Smilie Dein Wunsch ist nämlich vollkommen unnötig. Word Seriendruck regelt das ja automatisch, d.h. die ersten 48 Einträge werden auf Bogen 1 gedruckt, die nächsten 48 auf Bogen 2 usw. Das ist ja der Sinn des Seriendrucks.

Genau genommen brauchst du auch die Daten nicht auf das zweite Tabellenblatt übertragen. Word Seriendruck bietet auch die Möglichkeit eines Filters. Wenn du dort nach "X" filterst, werden auch nur diese Datensätze gedruckt.