Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Bitte helfen ! ! !
Autor: Chris
Datum: 07.09.01 11:03
Hi ! ! ! Ich habe keine ahnung wie ich das anstellen soll: Ich möchte jetzt alle Dateien die in der zweiten Zeile das wort "Hallo" enthaten zu einem MSHlexGrid hinzufügen. Jetzt soll das aber so aussehen das in der ersten spalte das steht, das in den Dateien in der ersten Zeile steht, in der zweiten spalte das was in den Dateien in der zweiten spalte steht und das eben bis zur fünften zeile. Hier mal der vbCode für alle Dateien zum MSHFlexGrid hinzufügen: Me.MSHFlexGrid1.Clear Dim DirName As String Dim T As Integer Dim lRow As Long Dim lCol As Long Dim sText As String With Me.MSHFlexGrid1 .Rows = .FixedRows lRow = .Rows DirName = Dir("c:Eigene Dateien*.*", vbNormal) While DirName <> "" If DirName <> "." And DirName <> ".." Then lRow = lRow + 1 .Rows = lRow .Row = lRow - 1 T = FreeFile Open "c:Eigene Dateien\" & DirName For Input As #T lCol = 0 While Not EOF(T) And lCol < 5 Line Input #T, sText .Col = lCol: .Text = sText lCol = lCol + 1 Wend Close #T End If DirName = Dir Wend End With Jetzt möchte ich aber nur diese dateien die in der zweiten zeile das Wort "Hallo" enthalten zum MSHFlexGrid hinzufügen und eben mit dem gleichen system wie mit allen dateien. Nur das eben nicht alle Dateien zum MSHFlexGrid hinzugefügt werden, sondern nur die die in der zweiten Zeile das Wort "Hallo" enthalten. Danke

Jede 2. zeiledurchsuchen - bitte, bitte helfen!	89	Chris	03.09.01 20:36
Re: Jede 2. zeiledurchsuchen - bitte, bitte helfen!	419	unbekannt	03.09.01 21:01
Uupps... (oT)	540	Dieter	03.09.01 21:09
Wieso?	387	unbekannt	03.09.01 21:13
Re: Jede 2. zeiledurchsuchen - bitte, bitte helfen!	462	Dieter	03.09.01 21:08
Re: Jede 2. zeiledurchsuchen - bitte, bitte helfen!	63	Chris	04.09.01 09:16
Re: Jede 2. zeiledurchsuchen - bitte, bitte helfen!	64	Chris	04.09.01 11:17
Hilfe, Dieter ! ! ! ? !	82	Chris	05.09.01 15:07
Bitte helfen ! ! !	55	Chris	07.09.01 11:03
Re: Bitte helfen ! ! !	649	Dieter	07.09.01 11:16
Re: Bitte helfen ! ! !	54	Chris	07.09.01 12:33
Re: Bitte helfen ! ! !	365	Dieter	07.09.01 12:42
Funktioniert ! - Danke Dieter ! zum Glück gibt es das Forum!...	59	Chris	07.09.01 14:47
Großbuchstaben in Kleinbuchstaben umwandeln	59	Chris	07.09.01 15:38

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen