Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Text Datei in excel einlesen
#11
Das mit dem Einlesen hab ich hinbekommen, war doch nicht so schwer. Es ist immer gut eine Beispiel datei hochzuladen. Das was ich machen möchte ist nicht ganz so einfach. Ich arbeite schon seit ein paar Tagen daran und ich hab auch schon eine Lösung gefunden wie man die Daten am einfachsten aus der txt Datei einlesen und von Blatt2 nach Blatt1 kopieren kann, aber nicht an die richtige Stelle. Ich wäre sehr dankbar wenn ihr euch die Datei mal anschauen könntet. Meine Lösung ist nicht die beste, nach dem Klick auf den Button werden die Daten von Tabelle2 in Tabelle1 kopiert, die Ladezeit des Makros beträgt ca 2 Minuten. Die Liste die ich erstellt habe ist nicht vollständig aber sie soll zeigen wie die Orginalliste etwa aufgebaut ist. Das Tabellenblatt 2 habe ich erstellt, man kann das ganze bestimmt auch anders machen. Ich habe nur ein Problem mit der Sortierung der Daten von Tabellenblatt1, die Nummern auf Blatt 2 entsprechen den [1] Indexnummern auf Blatt 1. Das heißt: Ein Kunde bestellt 10 PC Mäuse, die Gesamtsumme soll auf Blatt 1 unter Index [10} stehen. Analog die anderen Nummern. Das kopieren an sich etc. ist das einfachste aber die Werte an die richtige Stelle kopieren ist etwas schwerer.

Gruß
Matthias


Angehängte Dateien
.xlsm   Example.xlsm (Größe: 26,62 KB / Downloads: 3)
Antworten Top
#12
Hallo Matthias,

zeichne zum einen mal das Kopieren auf, da wirst Du schon Fehler feststellen.

Du hast im Kopiermakro

Workbooks("Tabelle1").Cells(i, 5).Value = Workbooks("Tabelle2").Cells(l, 12).Value 'kopieren

Das Workbooks ist falsch. Tabelle1 ist ein Blatt.

Ob die Logik mit den 22 Zeilen stimmt kann ich bei den wenigen Beispieldaten nicht beurteilen. Falls Du Zeile für Zeile durchgehen willst und z.B. die [1] bei 1 und die [2] zu 2 kommen soll, könntest Du zum einen die Nummer ermitteln mit etwas wie

iNr = Split(Split(Worksheets("Tabelle1").Cells(3, 3).Value, "[")(1), "]")(0)

und im Zielblatt könntest Du die Nummer dann in Spalte C suchen und die Daten dort eintragen. Den Code zum Suchen könntest Du aufzeichnen. Aber, wie gesagt, vielleicht passt Diene Logik auch und das wäre dann vielleicht einfacher.
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#13
Danke, ja es war etwas komplizierter. Ich habe die Zeilen in dem Programm die mir die txt Datei erstellt, jetzt richtig sortiert. Es funktioniert jetzt, das das kopieren in meinem bsp falsch war ist mir aufgefallen, ich wollts noch korrigieren habs aber vergessen.
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste