Thema Datum  Von Nutzer Rating
Antwort
Rot xyz
 12.12.2016 13:53:14 Gast79637
NotSolved

Ansicht des Beitrags:
Von:
Gast79637		 Datum:
12.12.2016 13:53:14		 Views:
994		 Rating:
     
Antwort:
  Ja
Thema:
xyz
Hallo liebe Gemeinde, für ein wichtiges Projekt auf der Arbeit lerne ich gerade die Makrosache XD. Leider bin ich heute schon an meine Grenzen gestoßen... Ich habe eine Liste mit immer gleichem Aufbau, unter einem eine Spalte mit Namenskürzeln und eine Spalte mit Status in %. Nun möchte ich die einzelnen Zeilen nach versch. Kriterien wegsortieren. Im 1. Schritt sortiere von einer "Sammelliste" auf Listen entsprechend der Namenskürzel. Hier das Makro dazu: Sub Linder_dat() Dim i As Long With Sheets("Alles") For i = .Cells(Rows.Count, "F").End(xlUp).Row To 2 Step -1 If .Cells(i, "F") Like "li" Then .Rows(i).Copy Sheets("Linder").Cells(Sheets("Linder").Cells(Rows.Count, "F").End(xlUp).Row + 1, "A") .Rows(i).Delete End If Next End With ActiveWorkbook.Save End Sub Klappt wunderbar...... Nun möchte ich aber weiter sortieren, und zwar die Aufträge mit Status 100% auf eine weitere extra Liste. Ich hatte gehofft, dass obrige Makro einfach umbauen zu können, aber iwie stimmt etwas mit der % Angabe nicht, bzw. den hinterlegten Werten. Hier mein Versuchsmakro: Sub Fertige_weg() Dim i As Long With Sheets("Alles") For i = .Cells(Rows.Count, "K").End(xlUp).Row To 2 Step -1 If .Cells(i, "K") Like "100%" Then .Rows(i).Copy Sheets("Fertige").Cells(Sheets("Fertige").Cells(Rows.Count, "K").End(xlUp).Row + 1, "A") .Rows(i).Delete End If Next End With ActiveWorkbook.Save End Sub Ich glaube er kapiert nicht ganz, dass es sich um einen Prozentausdruck handelt, bzw. ich nicht, wie man dies richtig definiert :) Bitte helft mir.

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
Rot xyz
 12.12.2016 13:53:14 Gast79637
NotSolved