Clever-Excel-Forum

Normale Version: Zeilen einer TXT datei in spalten bringen
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2 3 4
Bei den Uhrzeiten? Ich hatte Probleme mit dem Datum. Liegt daran dass die Wochentage Tues bzw., Thur heißen. Richtig wäre Tue bzw. Thu (immer drei Zeichen).

Problematisch ist auch dass es am 21.03.2018 12:02:00 zwei Datensätze gibt.

Morgen nach Feierabend melde ich mich wieder.
(10.05.2018, 22:38)shift-del schrieb: [ -> ]Bei den Uhrzeiten? Ich hatte Probleme mit dem Datum. Liegt daran dass die Wochentage Tues bzw., Thur heißen. Richtig wäre Tue bzw. Thu (immer drei Zeichen).

Problematisch ist auch dass es am 21.03.2018 12:02:00 zwei Datensätze gibt.
...

Hallo Detlef, ich hatte gedacht, das wäre wegen der Uhrzeiten, aber dann habe ich auch gesehen, dass es an manchen Tagen zu mehreren Datensätzen kam... ... Der Ausschnitt hatte ja auch unsauber begonnen und endet auch mit einer leeren Zeile... Die Wochentage habe ich rausgeschmissen. Die tun doch gar nichts zur Sache... ... ich denke, bei saubere(re)n Datensätzen ging das ganz gut...
Hallo, also für das Beispiel im Ausgangpost, geht das prima (allerdings auch mit Feinjustierung) und es müsste noch formatiert werden in PQ, aber das ist ja dann Schnulli-Bulli..:

Arbeitsblatt mit dem Namen 'Tabelle1'
A
1Spalte1
2Time:07:50, Tues,4/ 10/2018
3KörperGewicht:76.5kg   Overweight
4Wasseranteil:56.7%   Standard
5KörperfettAnteil:17.4%   Chubby
6Knochengewicht:3.1kg   Inadequate
7Visceral fat:8.0   Standard
8BMR:1888.0 kcal   Optimal
9MuskelGewicht:60.1kg   Optimal
10BMI:23.9   Standard
11
12
13Time:21:08, Sat,4/ 7/2018
14KörperGewicht:77.8kg   Overweight
15Wasseranteil:56.6%   Standard
16KörperfettAnteil:17.5%   Chubby
17Knochengewicht:3.2kg   Standard
18Visceral fat:8.0   Standard
19BMR:1911.0 kcal   Optimal
20MuskelGewicht:61.0kg   Optimal
21BMI:24.3   Chubby
22
23
24Time:09:08, Sat,3/ 31/2018
25KörperGewicht:78.2kg   Overweight
26Wasseranteil:56.4%   Standard
27KörperfettAnteil:17.9%   Chubby
28Knochengewicht:3.2kg   Standard
29Visceral fat:8.0   Standard
30BMR:1918.0 kcal   Optimal
31MuskelGewicht:61.1kg   Optimal
32BMI:24.4   Chubby
Verwendete Systemkomponenten: [Windows (32-bit) NT :.00] MS Excel 2013
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg

Arbeitsblatt mit dem Namen 'Tabelle2'
ABCDEFGHIJ
1DatumTimeKörperGewichtWasseranteilKörperfettAnteilKnochengewichtVisceral fatBMRMuskelGewichtBMI
231.03.201809:0878.2kg56.4%17.9%3.2kg8.01918.061.1kg24.4
307.04.201821:0877.8kg56.6%17.5%3.2kg8.01911.061.0kg24.3
410.04.201807:5076.5kg56.7%17.4%3.1kg8.01888.060.1kg23.9
Verwendete Systemkomponenten: [Windows (32-bit) NT :.00] MS Excel 2013
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg
Jockel, super! Genau so habe ich es mir vogestellt. Ich kann aber nicht nachvollziehen, wie es gemacht wurde.
 
Gibt es eine Möglichkeit, dass ich nachvollziehen kann was du gemacht hast? Das wäre super!
In VBA:


Code:
Sub M_snb()
   sn = Split(CreateObject("scripting.filesystemobject").opentextfile("G:\OF\myrecords.txt").readall, vbCrLf)
   ReDim sp(UBound(sn), 8)
   
   For j = 2 To UBound(sn)
      If (j - 2) Mod 9 = 0 Then
          sp((j - 2) \ 9, (j - 2) Mod 9) = Format(Right(sn(j), 10) & " " & Mid(sn(j), 6, 5), "dd-mm-yyyy hh:mm")
      Else
         sp((j - 2) \ 9, (j - 2) Mod 9) = Split(Split(sn(j), ":")(1), " ")(0)
      End If
   Next
   
   Sheet1.Cells(2, 1).Resize(UBound(sp), 9) = sp
End Sub
Vielen Dank, aber  ich kann leider weder PHP noch VBA, ein bisschen JAVA aber das hilft mir hier wohl gar nicht. Nicht, dass ich unwillig bin zu lernen, aber im Moment hilft es mir gar nicht

Ich hab danach gesucht, wie ich die Zeielen in die Spaltenform bringen kann. Finde aber nichts (für mich) brauchbares.

Wenn ich für diese Aufgabe unbedingt VBA und/oder PHP lernen sollte, dann mach ich mich jetzt auf die Suche nach einem Grundlagentutorial. Weil in Zukunft mehr Daten kommen und ich will bestimmt nicht alles von Hand eintragen.

Wie gesagt, Tabelle2 von Jockel ist exakt mein Ziel.
Hallo, ich habe keine Ahnung von VBA, deswegen habe ich die Variante von snb auch nicht ausprobiert. - sorry - . Bei meinem Vorschlag habe ich die Daten aus dem Ausgangspost hergenommen und musste diese aber noch feinjustieren... Ohne ordentliche Ausgangsdaten keine ordentliche Auswertung. Ich kann die Datei gern zur Verfügung stellen. Die Datei, die du gepostet hattest, war keine ordentliche Grundlage... !!! Die konnte ich auch nicht runter laden... Vielleicht speicherst du sie mal als csv ab und postest sie neu...
Hallo,

Zitat:Wenn ich für diese Aufgabe unbedingt VBA und/oder PHP lernen sollte, dann mach ich mich jetzt
auf die Suche nach einem Grundlagentutorial.

der Code von snb gehört über den VBA-Editor in ein Allgemeines Modul.

Um snb's Codes zu verstehen genügt aber kein Grundlagentutorial, da steigt auch schon mal gerne
so mancher "Nichtneuling" aus. snb ist eine Art Ausnahmekünstler.

Wenn Du Dich entschließt, in VBA einsteigen zu wollen, dann bin ich gerne bereit, Dir Lehrmaterial
zusammenzustellen und zukommen zu lassen.
Eine durchaus angebrachte Warnung aber schon mal vorweg. VBA erweckt ungeahnte Möglichkeiten
und Begierden und kann süchtig machen. Das aber ist im positivem Sinn gemeint.
Schau mal die angehängte Datei.

Speichere deine Datei als "C:\myrecords.txt"

Zeig das Makro: Alt-F11

Lass das Makro laufen: F5
Hallo, danke, jetzt habe ich gesehen, was "es macht"... Wink
Seiten: 1 2 3 4