Thema Datum  Von Nutzer Rating
Antwort
02.07.2021 13:45:06 Bernd
Solved
Blau Kann man mit diesem Code nach 2 Werten in einer Spalte suchen?
 02.07.2021 13:57:12 Gast82019
Solved
02.07.2021 14:00:44 Gast52331
Solved
02.07.2021 14:14:37 Bernd
Solved
02.07.2021 14:50:02 Gast12181
NotSolved
02.07.2021 15:39:44 Gast74675
NotSolved
02.07.2021 15:41:03 Gast84492
NotSolved

Ansicht des Beitrags:
Von:
Gast82019		 Datum:
02.07.2021 13:57:12		 Views:
377		 Rating:
     
Antwort:
 Nein
Thema:
Kann man mit diesem Code nach 2 Werten in einer Spalte suchen?

Mein 2. Versuch war leider auch nicht Erfolgreich

 

 'Letzte Zeile feststellen
 With Worksheets(QSheet.Name)
    loLetzte = .Cells(.Rows.Count, "A").End(xlUp).Row
End With
With Worksheets(QSheet.Name)
Set Kopierange = .Rows(1)
For SuchZeile = 1 To loLetzte
If .Cells(SuchZeile, 10).Value = 31 Then GoTo Sammeln
If .Cells(SuchZeile, 10).Value = 61 Then GoTo Sammeln
Sammeln:
Set Kopierange = Union(Kopierange, .Rows(SuchZeile))
'End If
Next SuchZeile
Kopierange.Copy Destination:=Worksheets(Ort).Range("A1")
End With
 

 

Leider füllt sich die Kopie mit allen Zeilen Egal ob 31,61 oder etwas anderes steht.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
02.07.2021 13:45:06 Bernd
Solved
Blau Kann man mit diesem Code nach 2 Werten in einer Spalte suchen?
 02.07.2021 13:57:12 Gast82019
Solved
02.07.2021 14:00:44 Gast52331
Solved
02.07.2021 14:14:37 Bernd
Solved
02.07.2021 14:50:02 Gast12181
NotSolved
02.07.2021 15:39:44 Gast74675
NotSolved
02.07.2021 15:41:03 Gast84492
NotSolved