Eintrag mit dem String in der Spalte finden

• Eintrag mit dem String in der Spalte finden von Anja vom 18.02.2005 10:58:30
• AW: Eintrag mit dem String in der Spalte finden - von u_ am 18.02.2005 11:18:45
  • AW: Eintrag mit dem String in der Spalte finden - von Anja am 18.02.2005 12:14:05
    • AW: Eintrag mit dem String in der Spalte finden - von u_ am 18.02.2005 12:36:50
      • AW: Eintrag mit dem String in der Spalte finden - von Anja am 18.02.2005 13:29:07

Betrifft: Eintrag mit dem String in der Spalte finden
von: Anja
Geschrieben am: 18.02.2005 10:58:30
Hallo Leute,
ihc habe ein kleines Problemmchen...
komme irgend wie nicht weiter...
ich möcht einen String auswählen in der Spalte F, an der Stelle
wo in der Spalte C in "F" steht... ich habe diesen code dazu geschrieben..
Aber es funktioniert nicht:
For Each rng2 In Range(Range("C3"), Cells(10, 3).End(xlUp))
If rng2.Value = "F" Then row1 = rng2.Row

ordner = Range(Cells(row1, 4)).Value
Next
Er sagt Anwendungsdefinerter Fehler wenn ich auf letzte Zeile mit der Maus zeige.
Was habe ich falsch gemacht??? Kann mir jemand helfen???
Danke
VIele Grüße
Anna

Betrifft: AW: Eintrag mit dem String in der Spalte finden
von: u_
Geschrieben am: 18.02.2005 11:18:45
Hallo,
beim ersten durchlauf der Schleife ist row1 wahrscheinlich noch 0. Außerdem soll die Schleife doch wohl verlassen werden, wenn ein F gefunden wurde. Oder?
Versuchs mal so:
For Each rng2 In Range(Range("C3"), Cells(10, 3).End(xlUp))
If rng2.Value = "F" Then
row1 = rng2.Row
ordner = Range(Cells(row1, 4)).Value
exit for
end if
Next
Gruß

Betrifft: AW: Eintrag mit dem String in der Spalte finden
von: Anja
Geschrieben am: 18.02.2005 12:14:05
Hallo,
danke... es wird jetzt kein Fehler ausgegeben, aber er sieht komischer Weise
nichts ....
Ich verstehe nichts... :-((((
soll ich vielleicht rng2 irgend wie vorher definieren? ich habe es schon
mit Dim rng2 as Range versucht... trotzdem geht es nicht...
echt komisch!!!!

Betrifft: AW: Eintrag mit dem String in der Spalte finden
von: u_
Geschrieben am: 18.02.2005 12:36:50
Hallo,
lass .Value weg.
For Each rng2 In Range(Range("C3"), Cells(10, 3).End(xlUp))
If rng2= "F" Then
row1 = rng2.Row
ordner = Range(Cells(row1, 4))
exit for
end if
Next
Gruß

Betrifft: AW: Eintrag mit dem String in der Spalte finden
von: Anja
Geschrieben am: 18.02.2005 13:29:07
:(((
geht nicht...
:`-(((

Beiträge aus den Excel-Beispielen zum Thema "Eintrag mit dem String in der Spalte finden"