Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
644to648
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
644to648
644to648
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

zu dumm nen loop hinzubekommen

zu dumm nen loop hinzubekommen
01.08.2005 09:37:12
Karl-Hagen
hallo,
mein problem ist folgendes ich habe ein makro vorgesetzt bekommen und das tut nicht das was es soll weil es soll daten aus einem blatt auslesen und dann in ein anderes schreiben jetzt kommt das problem auf dem blatt steht nicht nur 1 treffer sondern mehrere aber ich habe keinen loop der das abfängt kann mir jemand helfen, dafür wäre ich sehr dankbar?
mit freundlichen grüßen
karl-hagen
'datenblatt hinzufügen
Set datenblatt = Worksheets.Add
datenblatt.Name = "name"
'Neue Tabelle lesen
Read_Web_Wait_Page1 datenblatt, datenstring, "A1"
'Nach daten suchen
Cells.Find(What:="daten", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False) _
.Activate
daten = Right(ActiveCell.Value, 4)
daten = Left(daten, 4)
'daten in Datei schreiben
Print #1, daten
' Worksheet schließen
Application.DisplayAlerts = False
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = True
End Sub

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zu dumm nen loop hinzubekommen
01.08.2005 10:36:31
Mac4
Hi,
schau mal in der Onlinehilfe unter der Find-Methode!
Hier ist ein gutes Beispiel mit FindNext.
Marc

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige