Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Sortierung
01.02.2017 18:50:40 Marco
NotSolved

Ansicht des Beitrags:
Von:
Marco
Datum:
01.02.2017 18:50:40
Views:
934
Rating: Antwort:
  Ja
Thema:
VBA Sortierung
Hallo zusammen, ich habe folgende Ausgangs Situation: Uhrzeit 08:00 08:15 08:05 Uhrzeit 08:41 08:21 Uhrzeit 08:43 08:47 Nun sollen innerhalb der Blöcke die Uhrzeiten sortiert werden. Mein Ansatz war: Suche Uhrzeit bis Uhrzeit merke die Range und sortiere dann innerhalb, doch die Syntax macht mir Probleme. With ThisWorkbook.Worksheets("CCB_Agenda") .Range("E2:E5").Sort _ Key1:=.Range("E3"), Order1:=xlAscending, _ Header:=xlGuess, orderCustom:=1, _ MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal End With Dim start As Integer Dim ende As Range Dim str_SuchString As String Dim Counter1 As Integer Dim Counter2 As Integer str_SuchString = "Uhrzeit" For Counter1 = 1 To ThisWorkbook.Worksheets("CCB_Agenda").Cells.SpecialCells(xlLastCell).Column For Counter2 = 1 To ThisWorkbook.Worksheets("CCB_Agenda").Cells.SpecialCells(xlLastCell).Row If Cells(Counter2, Counter1).Value = str_SuchString Then Cells(Counter2, Counter1).Select start = Counter2 End If Next Next Nun muss quasi der obere BLock noch in den unteren mit start und end Range. Kann mir jemand weiter helfen? Vielen Dank und viele Grüße Marco

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 VBA Sortierung
01.02.2017 18:50:40 Marco
NotSolved