Excel-Sortierung

Computer: Software & Programmierung Office Software
1

Hallihallo,

leider kenne ich mit Excel so schlecht aus…
Ich habe folgendes Problem:
http://bilder-hoster.de/out.php/i89072_ping.jpg
Ich möchte aus diesen Zeilen nur die „Request timed out“-Zeilen sehen und immer wenn eine „bytes = xx time = xxms TTL = xxx“-Zeile kommt eine Leerzeile einfügen. Also reicht es evtl. nur die Zeilen mit „bytes = xx time = xxms TTL = xxx“ zu löschen und an dieser Stelle eine Leerzeile einzufügen.
Wie gehe ich da am geschicktesten vor?

Danke und Ciao
Roger

2

Hallihallo,

leider kenne ich mit Excel so schlecht aus…
Ich habe folgendes Problem:
http://bilder-hoster.de/out.php/i89072_ping.jpg
Ich möchte aus diesen Zeilen nur die „Request timed
out“-Zeilen sehen und immer wenn eine „bytes = xx time = xxms
TTL = xxx“-Zeile kommt eine Leerzeile einfügen. Also reicht es
evtl. nur die Zeilen mit „bytes = xx time = xxms TTL = xxx“ zu
löschen und an dieser Stelle eine Leerzeile einzufügen.
Wie gehe ich da am geschicktesten vor?

Danke und Ciao
Roger

Hallo,

benötigst du die „byte 0 xx usw.“ zeilen noch? Wenn nein, dann geht das, wie du es beschrieben, hast, am besten. Wenn du aber zuviele zeielen hast ist das zuaufendig.

Mehr kann ich dir leider auch nicht helfen.

djego

3

Danke für Deinen Hinweis!

Aber wie bekomme ich das denn hin?
Zum Beispiel soll aus den folgenden zeilen:
…
[2008-8-18 22:53:33]Reply form 129.69.1.153: bytes = 64 time = 26ms TTL = 243
[2008-8-18 22:53:44]Reply form 129.69.1.153: Request timed out.
…
nur die erste komplett gelöscht werden und immer wenn etwas gelöscht wird, soll dann eine Leerzeile bleiben. Sind mehrer Zeilen untereinander, also wie:
…
[2008-8-18 22:54:43]Reply form 129.69.1.153: bytes = 64 time = 29ms TTL = 243
[2008-8-18 22:54:53]Reply form 129.69.1.153: bytes = 64 time = 26ms TTL = 243
[2008-8-18 22:55:03]Reply form 129.69.1.153: bytes = 64 time = 25ms TTL = 243
[2008-8-18 22:55:13]Reply form 129.69.1.153: bytes = 64 time = 24ms TTL = 243
[2008-8-18 22:55:23]Reply form 129.69.1.153: bytes = 64 time = 25ms TTL = 243
[2008-8-18 22:55:33]Reply form 129.69.1.153: bytes = 64 time = 33ms TTL = 243
[2008-8-18 22:55:44]Reply form 129.69.1.153: Request timed out
…
sollen alle bis auf diese, in der Request… steht, gelöscht werden und dann durch eine Leerzeile ersetzt.
Mhmm,

Ciao
Roger

Hallihallo,

leider kenne ich mit Excel so schlecht aus…
Ich habe folgendes Problem:
http://bilder-hoster.de/out.php/i89072_ping.jpg
Ich möchte aus diesen Zeilen nur die „Request timed
out“-Zeilen sehen und immer wenn eine „bytes = xx time = xxms
TTL = xxx“-Zeile kommt eine Leerzeile einfügen. Also reicht es
evtl. nur die Zeilen mit „bytes = xx time = xxms TTL = xxx“ zu
löschen und an dieser Stelle eine Leerzeile einzufügen.
Wie gehe ich da am geschicktesten vor?

Danke und Ciao
Roger

Hallo,

benötigst du die „byte 0 xx usw.“ zeilen noch? Wenn nein, dann
geht das, wie du es beschrieben, hast, am besten. Wenn du aber
zuviele zeielen hast ist das zuaufendig.

Mehr kann ich dir leider auch nicht helfen.

djego

4

Hallo Roger,

Zum Beispiel soll aus den folgenden zeilen:
nur die erste komplett gelöscht werden und immer wenn etwas
gelöscht wird, soll dann eine Leerzeile bleiben. Sind mehrer
Zeilen untereinander, also wie:
…
[2008-8-18 22:54:43]Reply form 129.69.1.153: bytes = 64 time =
29ms TTL = 243
[2008-8-18 22:54:53]Reply form 129.69.1.153: bytes = 64 time =
26ms TTL = 243
[2008-8-18 22:55:03]Reply form 129.69.1.153: bytes = 64 time =
25ms TTL = 243
[2008-8-18 22:55:13]Reply form 129.69.1.153: bytes = 64 time =
24ms TTL = 243
[2008-8-18 22:55:23]Reply form 129.69.1.153: bytes = 64 time =
25ms TTL = 243
[2008-8-18 22:55:33]Reply form 129.69.1.153: bytes = 64 time =
33ms TTL = 243
[2008-8-18 22:55:44]Reply form 129.69.1.153: Request timed out
…
sollen alle bis auf diese, in der Request… steht, gelöscht
werden und dann durch eine Leerzeile ersetzt.

markiere deine komplette Tabelle, dann wähle über das Menü Daten, Filter, Autofilter

Jetzt hast du kleine Pfeile in der ersten Tabellenzeile. Klicke auf den Pfeil der Spalte, in der „Request …“ steht, dann wähle in dem Fenster links „enthält nicht“ und rechts schreibe einen typischen Teil dieses Ausdrucks (z. B. Request). Mit OK erhälst du alle Zeilen, in denen der eingegebene Teilausdruck (Request) nicht enthalten ist. Jetzt die selektierten Zeilenköpfe (am linken Tabellenrand - sind jetzt blau) markieren. Damit werden die betreffenden Zeilen markiert. Nun einfach mit Entfernen iese Zeilen einfach löschen. Wieder auf den (jetzt blauen) Pfeil klicken und „alle“ wählen. Du hast jetzt für jede gelöschte Zeile eine leere Zeile

Gruß
Marion

5

http://bilder-hoster.de/out.php/i89072_ping.jpg
Ich möchte aus diesen Zeilen nur die „Request timed
out“-Zeilen sehen und immer wenn eine „bytes = xx time = xxms
TTL = xxx“-Zeile kommt eine Leerzeile einfügen. Also reicht es
evtl. nur die Zeilen mit „bytes = xx time = xxms TTL = xxx“ zu
löschen und an dieser Stelle eine Leerzeile einzufügen.
Wie gehe ich da am geschicktesten vor?

Hi Roger,

Alt+F11, Einfügen–Modul, Code reinkopieren, Editor schließen.
Start des Makros mittels Extras–Makro–Makro…

Option Explicit
'
Sub Loesch()
Dim Zei As Long
Application.ScreenUpdating = False
For Zei = Range("A" & Rows.Count).End(xlUp).Row To 1 Step -1
 If InStr(Cells(Zei, 1), "bytes") \> 0 Then
 Rows(Zei).ClearContents
 If Cells(Zei + 1, 1) = "" Then Rows(Zei).Delete
 End If
Next Zei
Application.ScreenUpdating = True
End Sub

Gruß
Reinhard

6

Hallo Reinhard,
danke für das Makro, aber leider funzt es nicht.
Meine Datei schaut so aus (ein Ausschnitt):
…
[2008-8-18 22:17:46]Reply form 129.69.1.153: bytes = 64 time = 27ms TTL = 243
[2008-8-18 22:17:57]Reply form 129.69.1.153: Request timed out.
[2008-8-18 22:18:06]Reply form 129.69.1.153: bytes = 64 time = 26ms TTL = 243
[2008-8-18 22:18:16]Reply form 129.69.1.153: bytes = 64 time = 27ms TTL = 243
[2008-8-18 22:18:26]Reply form 129.69.1.153: bytes = 64 time = 54ms TTL = 243
[2008-8-18 22:18:36]Reply form 129.69.1.153: bytes = 64 time = 28ms TTL = 243
[2008-8-18 22:18:46]Reply form 129.69.1.153: bytes = 64 time = 27ms TTL = 243
[2008-8-18 22:18:57]Reply form 129.69.1.153: Request timed out.
[2008-8-18 22:19:06]Reply form 129.69.1.153: bytes = 64 time = 25ms TTL = 243
[2008-8-18 22:19:17]Reply form 129.69.1.153: Request timed out.
[2008-8-18 22:19:26]Reply form 129.69.1.153: bytes = 64 time = 27ms TTL = 243
[2008-8-18 22:19:36]Reply form 129.69.1.153: bytes = 64 time = 35ms TTL = 243
[2008-8-18 22:19:46]Reply form 129.69.1.153: bytes = 64 time = 29ms TTL = 243
[2008-8-18 22:19:56]Reply form 129.69.1.153: bytes = 64 time = 28ms TTL = 243
[2008-8-18 22:20:07]Reply form 129.69.1.153: bytes = 64 time = 25ms TTL = 243
[2008-8-18 22:20:17]Reply form 129.69.1.153: bytes = 64 time = 24ms TTL = 243
[2008-8-18 22:20:27]Reply form 129.69.1.153: bytes = 64 time = 25ms TTL = 243
[2008-8-18 22:20:37]Reply form 129.69.1.153: bytes = 64 time = 25ms TTL = 243
[2008-8-18 22:20:47]Reply form 129.69.1.153: bytes = 64 time = 28ms TTL = 243
[2008-8-18 22:20:57]Reply form 129.69.1.153: Request timed out.
[2008-8-18 22:21:07]Reply form 129.69.1.153: Request timed out.
[2008-8-18 22:21:17]Reply form 129.69.1.153: bytes = 64 time = 25ms TTL = 243
[2008-8-18 22:21:27]Reply form 129.69.1.153: bytes = 64 time = 26ms TTL = 243
[2008-8-18 22:21:37]Reply form 129.69.1.153: bytes = 64 time = 26ms TTL = 243
[2008-8-18 22:21:48]Reply form 129.69.1.153: Request timed out.
[2008-8-18 22:21:58]Reply form 129.69.1.153: Request timed out.
…

Was meinst Du?
Danke und ciao
Roger

7

danke für das Makro, aber leider funzt es nicht.

Hi Roger,

was funktioniert da nicht?
Wenn ich deine untenstehende Liste in A1 und abwärts kopiere, dann das Makro laufen lasse ergibt sich die folgende Tabelle.
Sie ist so wie ich dich verstanden habe aufgebaut.

Tabellenblatt: [Mappe1]!Tabelle1
 │ A │
───┼─────────────────────────────────────────────────────────────────┤
 1 │ │
───┼─────────────────────────────────────────────────────────────────┤
 2 │ [2008-8-18 22:17:57]Reply form 129.69.1.153: Request timed out. │
───┼─────────────────────────────────────────────────────────────────┤
 3 │ │
───┼─────────────────────────────────────────────────────────────────┤
 4 │ [2008-8-18 22:18:57]Reply form 129.69.1.153: Request timed out. │
───┼─────────────────────────────────────────────────────────────────┤
 5 │ │
───┼─────────────────────────────────────────────────────────────────┤
 6 │ [2008-8-18 22:19:17]Reply form 129.69.1.153: Request timed out. │
───┼─────────────────────────────────────────────────────────────────┤
 7 │ │
───┼─────────────────────────────────────────────────────────────────┤
 8 │ [2008-8-18 22:20:57]Reply form 129.69.1.153: Request timed out. │
───┼─────────────────────────────────────────────────────────────────┤
 9 │ [2008-8-18 22:21:07]Reply form 129.69.1.153: Request timed out. │
───┼─────────────────────────────────────────────────────────────────┤
10 │ │
───┼─────────────────────────────────────────────────────────────────┤
11 │ [2008-8-18 22:21:48]Reply form 129.69.1.153: Request timed out. │
───┼─────────────────────────────────────────────────────────────────┤
12 │ [2008-8-18 22:21:58]Reply form 129.69.1.153: Request timed out. │
───┴─────────────────────────────────────────────────────────────────┘
A1:A12
haben das Zahlenformat: Standard

Tabellendarstellung erreicht mit dem Code in FAQ:2363

Gruß
Reinhard

Meine Datei schaut so aus (ein Ausschnitt):
…
[2008-8-18 22:17:46]Reply form 129.69.1.153: bytes = 64 time =
27ms TTL = 243
[2008-8-18 22:17:57]Reply form 129.69.1.153: Request timed
out.
[2008-8-18 22:18:06]Reply form 129.69.1.153: bytes = 64 time =
26ms TTL = 243
[2008-8-18 22:18:16]Reply form 129.69.1.153: bytes = 64 time =
27ms TTL = 243
[2008-8-18 22:18:26]Reply form 129.69.1.153: bytes = 64 time =
54ms TTL = 243
[2008-8-18 22:18:36]Reply form 129.69.1.153: bytes = 64 time =
28ms TTL = 243
[2008-8-18 22:18:46]Reply form 129.69.1.153: bytes = 64 time =
27ms TTL = 243
[2008-8-18 22:18:57]Reply form 129.69.1.153: Request timed
out.
[2008-8-18 22:19:06]Reply form 129.69.1.153: bytes = 64 time =
25ms TTL = 243
[2008-8-18 22:19:17]Reply form 129.69.1.153: Request timed
out.
[2008-8-18 22:19:26]Reply form 129.69.1.153: bytes = 64 time =
27ms TTL = 243
[2008-8-18 22:19:36]Reply form 129.69.1.153: bytes = 64 time =
35ms TTL = 243
[2008-8-18 22:19:46]Reply form 129.69.1.153: bytes = 64 time =
29ms TTL = 243
[2008-8-18 22:19:56]Reply form 129.69.1.153: bytes = 64 time =
28ms TTL = 243
[2008-8-18 22:20:07]Reply form 129.69.1.153: bytes = 64 time =
25ms TTL = 243
[2008-8-18 22:20:17]Reply form 129.69.1.153: bytes = 64 time =
24ms TTL = 243
[2008-8-18 22:20:27]Reply form 129.69.1.153: bytes = 64 time =
25ms TTL = 243
[2008-8-18 22:20:37]Reply form 129.69.1.153: bytes = 64 time =
25ms TTL = 243
[2008-8-18 22:20:47]Reply form 129.69.1.153: bytes = 64 time =
28ms TTL = 243
[2008-8-18 22:20:57]Reply form 129.69.1.153: Request timed
out.
[2008-8-18 22:21:07]Reply form 129.69.1.153: Request timed
out.
[2008-8-18 22:21:17]Reply form 129.69.1.153: bytes = 64 time =
25ms TTL = 243
[2008-8-18 22:21:27]Reply form 129.69.1.153: bytes = 64 time =
26ms TTL = 243
[2008-8-18 22:21:37]Reply form 129.69.1.153: bytes = 64 time =
26ms TTL = 243
[2008-8-18 22:21:48]Reply form 129.69.1.153: Request timed
out.
[2008-8-18 22:21:58]Reply form 129.69.1.153: Request timed
out.
…

Was meinst Du?
Danke und ciao
Roger

8

Danke schön
Hallo Reinhard,

danke für das Makro, es funktioniert wunderbar!!
Ich habe es falsch reinkopiert. Nämlich den Text aus der EMail-Nachricht, welcher mit

versehen war, daher ging es nicht.
Wirklich super!

Ciao
Roger

9

Hi und noch mal ich,

kann man das Makro in der Form erweitern, dass, wenn ein Reihe der "request timed out"s hintereinander kommt, nur das erste und letzte angezeigt werden und dann dahinter die Gesamtzeit des Time-Outs?
Bsp:
Im Moment schaut es so aus:
[2008-8-19 00:13:08]Reply form 129.69.1.153: Request timed out.
[2008-8-19 00:13:18]Reply form 129.69.1.153: Request timed out.
[2008-8-19 00:13:28]Reply form 129.69.1.153: Request timed out.
[2008-8-19 00:13:38]Reply form 129.69.1.153: Request timed out.
[2008-8-19 00:13:48]Reply form 129.69.1.153: Request timed out.
[2008-8-19 00:13:58]Reply form 129.69.1.153: Request timed out.
[2008-8-19 00:14:08]Reply form 129.69.1.153: Request timed out.
[2008-8-19 00:14:18]Reply form 129.69.1.153: Request timed out.
[2008-8-19 00:14:28]Reply form 129.69.1.153: Request timed out.
Und das soll dann so ausschauen:
[2008-8-19 00:13:08]Reply form 129.69.1.153: Request timed out.
[2008-8-19 00:14:28]Reply form 129.69.1.153: Request timed out. => 1 Min 20 Sek

Für Dich bestimmt kein Problem,m als Herr der Makros!! :wink:

Danke und ciao
Roger

10

kann man das Makro in der Form erweitern, dass, wenn ein Reihe
der "request timed out"s hintereinander kommt, nur das erste
und letzte angezeigt werden und dann dahinter die Gesamtzeit
des Time-Outs?

Hi Roger,

habe mich verzettelt, geht sicher viel kürzer, schreib ganz unten im ersten Code ein
Call Loesch2

Sub Loesch2()
Dim Zei As Long, Von As Long, Bis As Long
Application.ScreenUpdating = False
For Zei = Range("A" & Rows.Count).End(xlUp).Row To 1 Step -1
 If InStr(Cells(Zei, 1), "Request") \> 0 Then
 Bis = Zei
 Von = 1
 While InStr(Cells(Zei, 1), "Request") \> 0 And Zei \> 1
 Zei = Zei - 1
 Wend
 Von = Zei
 If Bis \> Von Then
 Cells(Bis, 1) = Cells(Bis, 1) & " ==\> " & Zeit(Von, Bis)
 End If
 If Bis - Von \> 1 Then
 Rows(Von + 1 & ":" & Bis - 1).Delete
 End If
 End If
Next Zei
Application.ScreenUpdating = True
End Sub
'
Function Zeit(ByVal Von As Long, ByVal Bis As Long)
Dim SV, SB, ZV, ZB
SV = Split(Cells(Von, 1))
SB = Split(Cells(Bis, 1))
ZV = Hour(Mid(SV(1), 1, 8)) \* 3600
ZB = Hour(Mid(SB(1), 1, 8)) \* 3600
If ZB 

Gruß
Reinhard















> Bsp:  
> Im Moment schaut es so aus:  
> [2008-8-19 00:13:08]Reply form 129.69.1.153: Request timed  
> out.  
> [2008-8-19 00:13:18]Reply form 129.69.1.153: Request timed  
> out.  
> [2008-8-19 00:13:28]Reply form 129.69.1.153: Request timed  
> out.  
> [2008-8-19 00:13:38]Reply form 129.69.1.153: Request timed  
> out.  
> [2008-8-19 00:13:48]Reply form 129.69.1.153: Request timed  
> out.  
> [2008-8-19 00:13:58]Reply form 129.69.1.153: Request timed  
> out.  
> [2008-8-19 00:14:08]Reply form 129.69.1.153: Request timed  
> out.  
> [2008-8-19 00:14:18]Reply form 129.69.1.153: Request timed  
> out.  
> [2008-8-19 00:14:28]Reply form 129.69.1.153: Request timed  
> out.  
> Und das soll dann so ausschauen:  
> [2008-8-19 00:13:08]Reply form 129.69.1.153: Request timed  
> out.  
> [2008-8-19 00:14:28]Reply form 129.69.1.153: Request timed  
> out. =\> 1 Min 20 Sek  
>   
> Für Dich bestimmt kein Problem,m als Herr der Makros!! :wink:  
>   
> Danke und ciao  
> Roger