Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Sortierung in Gruppen
 01.02.2017 18:52:15 Marco
NotSolved

Ansicht des Beitrags:
Von:
Marco		 Datum:
01.02.2017 18:52:15		 Views:
924		 Rating:
     
Antwort:
  Ja
Thema:
VBA Sortierung in Gruppen

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 in Gruppen
 01.02.2017 18:52:15 Marco
NotSolved