Supportnet / Forum / Tabellenkalkulation

Hallöchen Liebe Leutz ;) Jetzt wirds komplizier.... :( Ich habe gerade die Aufgabe, bis Dienstag PrePaid Karten für ein Internet Cafe zu erstellen - sind 52 Blätter a 10 Karten. Ich erstelle mit dem Programm Login Codes, die als CSV Datei abgespeichert werden. Diese schaut dann ungefähr so aus: 1234567890;Standard;Ausgegeben 2345678901;Standard;Ausgegeben 3456789012;Standard;Ausgegeben usw.... Mit einer Excel Tabelle habe ich mir die Spalten so "hingebogen" das die Login Codes in ein bereits vorgedrucktes Zweckform Formular reingedruckt werden könnten. Jetzt muss ich aber jedes mal den Code aus der CSV Datei bis zum ersten ";" kopieren, in die Excel Tabelle einfügen, wieder in die CSV Datei wechseln, Kopieren, Excel wechseln, einfügen usw ... damit ich mich nicht verklicke habe ich die Zellen drumherum alle gesperrt, so das mit Enter automatisch in die nächste eingabemaske gewechselt wird. Aber das geht doch irgendwie auch einfacher, oder? Gibt es irgendeine Möglichkeit die CSV Daten (aber NUR den Code (geöffnet also die erste Spalte!) AUTOMATISCH in meine Exceltabelle SO einzufügen, das die 10 Codes in den 10 Eingabemasken verteilt werden, so das ich nur noch auf Drucken gehen muss? Ich möchte nämlich nicht 520x auf kopieren und einfügen drücken - sind nämlich insgesamt gute 2080 Klicks ;( VIELEN DANK schonmal im voraus !!!! Mfg Stephan Baldes

In der CSV Datei sind übrigens auch nur jeweils 10 Codes enthalten - also das passt mit der Excel Tabelle zusammen ...

Mfg
Stephan Baldes

Hi,
ja. Das geht. In Excel einfach auf Daten -> Externe Daten Importieren -> Daten importieren klicken.
Dort Textdatei(*.txt,*.csv usw.) auswählen und die Datei auswählen. So bei Excel XP. sollte aber bei den anderen Versionen nicht anders oder ähnlich sein.


Yessi

Soweit so gut ... das funktioniert schonmal bis zum Import - allerdings NUR wenn der Blattschutz aufgehoben ist (ich habe ja - wie gesagt) 10 Zellen freigeschaltet, in denen der Code stehen soll.

Jetzt fehlt nur noch, das die Daten auch den entsprechenden Zellen zugeordnet werden.

Ist das auch irgendwie möglich?

Dann geht das ja fast schon automatisch.
Mit der jetzigen Lösung muss ich trotzdem erst mal alles in die richtigen Zellen kopieren.
Die Zellen sind NICHT untereinander, so wie das importiert wird! Der erste Wert steht auf D1, dann H1, D13,H13 usw ...

Eine alternative wäre wohl ein Makro, bei der ich
das einmal händisch alles mache und dann einfach nur noch ausführe. Aber vielleicht geht es auch einfacher ....

MFg
Stephan Baldes

Habs gerade mit einem Makro versucht - kann es sein, das man keine Zellen Kopieren kann, wenn Daten importiert wurden?

In einem neuen Tabellenblatt ohne Import funzt
das makro - egal wie ich es kopiere - mit der rechten und Linken Maustaste, mit den Menüs, mit den Tastenkombinationen - alles kein Problem!

Aber sobald ich Daten importiere - bleiben die Felder leer. Im Quellcode steht auch NUR das Ausschneiden der Zellen drin.. :(

Mfg
Stephan Baldes

:) So Leute :)
Hab mir die Quellcodes mal angesehen und festgestellt, das Excel anscheinend einen Fehler beim Macroaufnehmen hat, wenn Daten importiert.
Es fehlt nämlich die Zeile

Range("B1").Select
ActiveSheet.Paste

Diese habe ich eingefügt, die Zellen angegeben
und siehe da - WHOW !!!

Ich habe innerhalb 2 Minuten einen Bogen mit PrePaid Karten!
ABSOLUT TOP !

Also Merci, für die, die sich mit den Kopf zerbrochen (aber leider nix geschrieben) haben,
und ganz großes Dankeschön an
<B> YESSI !!! </B>
Ohne ihn wäre ich erst gar nicht so weit gekommen :)

Mfg
Stephan Baldes

hi stephan :)

so kannst du auch daten transferieren :) ohne selection oder copy paste :)

befehl ohne punkt bezieht sich auf das aktuelle sheet

befehl mit punkt bezieht sich auf dieses sheet ("Tabelle2")

Sub Makro1()
With Worksheets("Tabelle2")
.Cells(1, 4) = Cells(1, 4)
.Cells(2, 4) = Cells(2, 4)
End With
End Sub

• CSV-Datei wandelt Werte in Datum
• Excel Datei als csv abspeichern
• Aus excel Datei Adressetiketen importieren?
• In EXCEL VBA, CSV-Datei öffnen
• Ende einer Excel Tabelle