Thema Datum  Von Nutzer Rating
Antwort
25.03.2014 17:15:54 Gast57724
NotSolved
Blau Array alphabetisch sortieren
 25.03.2014 23:47:00 Gast89862
Solved
26.03.2014 08:56:39 Gast57724
NotSolved

Ansicht des Beitrags:
Von:
Gast89862		 Datum:
25.03.2014 23:47:00		 Views:
774		 Rating:
     
Antwort:
 Nein
Thema:
Array alphabetisch sortieren		 
Sub Gast()
Dim t
Dim objArrLst As Object
Set objArrLst = CreateObject("System.collections.arraylist")

For t = 5 To 55
    If Worksheets("Mitarbeiter").Cells(t, 2).Value <> "" Then _
        objArrLst.Add Worksheets("Mitarbeiter").Cells(t, 2).Value
Next t
     
objArrLst.Sort

'Kontrolle
For t = 0 To objArrLst.Count - 1
  Debug.Print objArrLst(t)
Next t

End Sub

 

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
25.03.2014 17:15:54 Gast57724
NotSolved
Blau Array alphabetisch sortieren
 25.03.2014 23:47:00 Gast89862
Solved
26.03.2014 08:56:39 Gast57724
NotSolved