Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst Textdatei in Excel importieren - Pro Zeile eine Excel-Spalte

Mitglied: suvv7777

suvv7777 (Level 1) - Jetzt verbinden

26.07.2011 um 13:18 Uhr, 10453 Aufrufe, 7 Kommentare

Hallo zusammen,

ich stehe vor folgender Aufgabe:

ich habe eine Textdatei, die Datensätze enthält, die wie folgt aussehen (Beispiel):

Name
Vorname
Telefonnummer
Schuhgröße
Gehalt
Name
Vorname
Telefonnummer
Schuhgröße
Gehalt
Name
Vorname
Telefonnummer
Schuhgröße
Gehalt

usw.

Ich hätte nun gerne eine Excel Datei, die jede txt-Zeile in eine Zelle einfügt, die ersten 5 nebeneinander, und dann wieder von vorne, so dass ich dann pro Attribut genau eine Spalte habe.

Es soll dann ungefähr so aussehen:
6dccc17c446d572779f048faa1b075ed - Klicke auf das Bild, um es zu vergrößern

Schön wäre, wenn dies in Excel 2003 möglich wäre. Zur Not ginge auch 2010.

Vielen Dank für eure Hilfe und liebe Grüße,

Chris
Mitglied: kristov
26.07.2011 um 14:21 Uhr
Hallo,

lacht mich bitte nicht aus, aber ich würd das nach meiner Methode so machen:

  • Text in Word kopieren
  • Alle Zeilenumbrüche durch einen Strichpunkt ersetzen: Suchen nach ^13 ersetzen durch ; - wobei ^11 für einen geschützten Zeilenumbruch (Shift-Enter) dieses eckige Pfeilchen) steht, ^13 wäre die Absatzmarke (Enter, schaut aus wie der Buchstabe pi)
  • Nochmal eine Ersetzung, diesmal Suchen nach Gehalt; ersetzen durch Gehalt^13
  • das ganze als txt abspeichern
  • jetzt in Excel importieren

Bin mir sicher, daß das hier jemand eleganter gelöst kriegt

lg,
kristov
Bitte warten ..
Mitglied: BigWim
26.07.2011 um 14:26 Uhr
Moin,

ich würde mir die Textdatei vorformatieren. Mit dem beigefügten Script kannst Du Dir die entsprechende CSV-Datei basteln.

Viel Erfolg
Markus

01.
@echo off & setlocal 
02.
 
03.
Set AnzahlSpalten=5 
04.
Set Trennzeichen=; 
05.
Set Count=0 
06.
Set NameInputDatei=l2.txt 
07.
Set NameOutputdatei=l2.csv 
08.
 
09.
if exist %NameOutputdatei% del %NameOutputdatei% 
10.
 
11.
for /f %%z in (%NameInputDatei%)do call :Machwat %%z 
12.
goto :eof 
13.
 
14.
 
15.
:MachWat 
16.
Set Spalte=%1 
17.
Set /a Count=Count+1 
18.
 
19.
if %Count% GTR %AnzahlSpalten% ( 
20.
	echo %Zeile% 
21.
	echo %Zeile% >>%NameOutputdatei% 
22.
	Set Count=1 
23.
	Set Zeile= 
24.
25.
 
26.
if %Count% GTR 1 ( 
27.
	Set Zeile=%Zeile%%Trennzeichen%%Spalte% 
28.
) else ( 
29.
	Set Zeile=%Spalte% 
30.
)
Bitte warten ..
Mitglied: TsukiSan
26.07.2011 um 15:41 Uhr
man könnte (konjunktiv!) das ganze auch mittels VBS direkt nach Excel exportieren.
Beispiel:
01.
Dim objXL 
02.
Dim FSO 
03.
 
04.
 
05.
Set FSO = CreateObject("Scripting.FileSystemObject") 
06.
MeineDaten = Split(FSO.OpenTextFile("Datensatz.txt").ReadAll,vbcrlf) 
07.
 
08.
Set objXL = WScript.CreateObject("Excel.Application") 
09.
objXL.Workbooks.Add 
10.
objXL.Visible = False 
11.
 
12.
a = 1 
13.
 
14.
For i = 0 to Ubound(MeineDaten) Step 5 
15.
	objXL.Cells(a,1).Value = MeineDaten(i) 
16.
	objXL.Cells(a,2).Value = MeineDaten(i + 1) 
17.
	objXL.Cells(a,3).Value = MeineDaten(i + 2) 
18.
	objXL.Cells(a,4).Value = MeineDaten(i + 3) 
19.
	objXL.Cells(a,5).Value = MeineDaten(i + 4) 
20.
	a = a + 1 
21.
Next 
22.
 
23.
objXL.Visible = True
Aber wie geschrieben: Man(n) könnte....

Gruss
Tsuki
Bitte warten ..
Mitglied: suvv7777
26.07.2011 um 15:58 Uhr
Das funktioniert leider nicht, da "Gehalt" ja nicht der Wert der Zelle ist. Aber danke für die Idee.
Bitte warten ..
Mitglied: kristov
26.07.2011 um 16:02 Uhr
Zitat von suvv7777:
Das funktioniert leider nicht, da "Gehalt" ja nicht der Wert der Zelle ist. Aber danke für die Idee.

Uh, oh, grober Denkfehler! Da stehen natürlich immer unterschiedliche Werte drin. So kann das natürlich nichts werden. Asche auf mein Haupt!
Bitte warten ..
Mitglied: suvv7777
01.08.2011 um 15:11 Uhr
Vielen Dank für die mal wieder tolle und schnelle Hilfe!
Bitte warten ..
Mitglied: TsukiSan
01.08.2011 um 15:21 Uhr
Freud uns, wenn's klappt.
Eventuell verrätst du uns noch, wie du's nun realisiert hast, damit zukünftige Mitleser eventuell auch was lernen dabei.

Danke und Gruss
Tsuki
Bitte warten ..
Ähnliche Inhalte
VB for Applications

Abschnitte aus Textdatei in Excel importieren

Frage von Einstein77VB for Applications3 Kommentare

Hallo, Ich habe ein Problem wo ich mangels VBA kenntissen nicht weiter komme. Ich muß Email Daten auswerten. Aus ...

VB for Applications

Textdateien Importieren in Excel - erste Zeile weg lassen!

gelöst Frage von micha020983VB for Applications4 Kommentare

Hallo zusammen, ich hab immer wiederkehrend mehrere Semikolongetrennte Textdateien, welche ich untereinander in Excel brauche! Klappt hiermit schon ganz ...

Microsoft Office

Alle Zeilen einer Excel Tabelle als Textdateien speichern

gelöst Frage von uwe999Microsoft Office5 Kommentare

Hallo Habe folgendes Problem und komme wegen fehlender Kenntnis nicht weiter. Ich habe eine Excel Datei mit einer Tabelle. ...

Microsoft Office

Excel Spalten

gelöst Frage von a.grotheMicrosoft Office6 Kommentare

Hallo zusammen, ich habe ein Excel Dokument A. Hier habe ich nun Werte in folgender Form: In Zelle I8 ...

Neue Wissensbeiträge
Windows Server
Erneutes Release von WS2019 und Win10 v1809
Tipp von IT-Pro vor 40 MinutenWindows Server

Hi, nachdem der Windows Server 2019 und Windows 10 in der Version 1809 aufgrund von verschwinden von Dateien nach ...

CPU, RAM, Mainboards
Spectre Update Tool für ältere PCs
Information von sabines vor 3 StundenCPU, RAM, Mainboards2 Kommentare

Mit Hilfe eines Tools wird der betreffende PC permanent von einem USB Stick gestartet, der ein passendes Microcode Update ...

Windows 10
Windows 10 Oktober 2018 Update: Es ist wieder da
Tipp von Bowsette vor 11 StundenWindows 101 Kommentar

Ein neuer Versuch von Microsoft das Windows 10 Oktober 2018 Update, auch bekannt als 1809, an den Mann zu ...

Windows Server

Windows Server 2016: Achtung - ab heute gibt es wieder Express Updates

Information von kgborn vor 22 StundenWindows Server1 Kommentar

Kurze Info für Administratoren, die Windows Server 2016 per WSUS/SCCM mit Updates betanken. Ab heute gibt es für Windows ...

Heiß diskutierte Inhalte
Microsoft Office
Lizenzierung
Frage von opc123Microsoft Office29 Kommentare

Hallo, eventuell ein oft bekanntes Thema. Office 365 ist mir zu teuer, da wir als Bildungsträger andere Konditionen beim ...

Windows 10
Windows 10 mit CRITICAL PROCESS DIED
Frage von liquidbaseWindows 1028 Kommentare

Das aktuelle Problem was ich habe steht bereits im Threadtitel. Etwas mehr zum Hintergrund soll nun folgen. Problemkind ist ...

Windows Server
Windows Server 2016 Lizenzierung - 7 Hyper V VMs
Frage von staybbWindows Server18 Kommentare

Hallo zusammen, wir haben zwei HP Server gekauft mit jeweils pro Server 2 CPUs à 10 Cores. Also insgesamt ...

Windows Server
WIE ?? Server 2016 2x RDP welche das gleiche sehen können wie VNC
Frage von ChrisXYWindows Server12 Kommentare

Hallo, aktuell habe ich Windows10 welches wohl zu Server2016 wechseln wird. Aktuell habe ich eine Video Überwachungssoftware welche per ...