vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Zippen wie die Profis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Fortgeschrittene
Re: mit VB.NET in Excel sortieren 
Autor: WeEf
Datum: 15.05.04 19:37

Hallo DorisM,
ich habe mich vielleicht nicht deutlich genug ausgedrückt, aber die Daten müssen zuerst nach Spalte A, dann B, C usw. sortiert werden. Der Fehler liegt wahrscheinlich bei mir. Ich habe Deinen Code so abgeändert, dass die Spalten A-F die gleiche Zahl enthalten und die höchste Zahl aus der Spalte F dann in der ersten Reihe stehen muss:

Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
xlApp = CType(CreateObject("Excel.Application"), Excel.Application)
xlBook = CType(xlApp.Workbooks.Add, Excel.Workbook)
xlSheet = CType(xlBook.Worksheets(1), Excel.Worksheet)
xlSheet.Cells.Font.Bold = True
Dim myRandom As Random
myRandom = New Random
For x As Integer = 1 To 10
For y As Integer = 1 To 5
xlSheet.Cells(x, y) = 1
Next
Next
For x As Integer = 1 To 10
For y As Integer = 6 To 10
xlSheet.Cells(x, y) = myRandom.Next(1, 49)
Next
Next
xlSheet.Application.Visible = True
Dim xlRange As Excel.Range = xlSheet.UsedRange
' erste Spalte als Sortierschlüssel
Dim xlKey As Excel.Range = xlSheet.Range("A1")
' Sortierordnung absteigend
xlRange.Sort(xlKey, Excel.XlSortOrder.xlDescending, , , , , , , , , Excel.XlSortOrientation.xlSortColumns)
xlSheet.Application.Visible = True
End Sub
nach der Sortierung darf es dann nicht wie folgt aussehen:

1 1 1 1 1 32 33 21 15 15
1 1 1 1 1 46 6 38 28 14
1 1 1 1 1 20 11 38 24 5
1 1 1 1 1 4 11 27 44 31
1 1 1 1 1 36 46 42 44 40
1 1 1 1 1 17 36 3 47 39
1 1 1 1 1 19 20 43 4 2
1 1 1 1 1 35 7 43 14 33
1 1 1 1 1 48 19 11 26 19
1 1 1 1 1 12 47 22 9 32
sondern so
1 1 1 1 1 48 19 11 26 19
1 1 1 1 1 46 6 38 28 14
1 1 1 1 1 36 46 42 44 40
1 1 1 1 1 35 7 43 14 33
1 1 1 1 1 32 33 21 15 15
1 1 1 1 1 20 11 38 24 5
1 1 1 1 1 19 20 43 4 2
1 1 1 1 1 17 36 3 47 39
1 1 1 1 1 12 47 22 9 32
1 1 1 1 1 4 11 27 44 31
Es müssen also alle Spalten sortiert werden!
Ich hoffe, ich nerve nicht, aber vielleicht kannst Du mir ja helfen.
WeEf
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
mit VB.NET in Excel sortieren2.281WeEf15.05.04 10:12
Re: mit VB.NET in Excel sortieren1.623DorisM15.05.04 11:32
Re: mit VB.NET in Excel sortieren1.568WeEf15.05.04 13:37
Re: mit VB.NET in Excel sortieren1.737DorisM15.05.04 13:49
Re: mit VB.NET in Excel sortieren1.576WeEf15.05.04 17:18
Re: mit VB.NET in Excel sortieren1.578DorisM15.05.04 18:41
Re: mit VB.NET in Excel sortieren1.597WeEf15.05.04 19:37
Re: mit VB.NET in Excel sortieren1.583DorisM15.05.04 21:29
Re: mit VB.NET in Excel sortieren1.542WeEf17.05.04 19:02
Re: mit VB.NET in Excel sortieren1.743DorisM17.05.04 20:15
Re: mit VB.NET in Excel sortieren1.580DorisM17.05.04 20:17
Re: mit VB.NET in Excel sortieren1.630WeEf19.05.04 13:42
Re: mit VB.NET in Excel sortieren1.536DorisM19.05.04 16:59
Re: mit VB.NET in Excel sortieren1.599WeEf22.05.04 10:49
Re: mit VB.NET in Excel sortieren1.529DorisM22.05.04 11:07
Re: mit VB.NET in Excel sortieren1.536WeEf22.05.04 11:28
Re: mit VB.NET in Excel sortieren1.627DorisM22.05.04 14:49
Re: mit VB.NET in Excel sortieren1.551WeEf23.05.04 11:55
Re: mit VB.NET in Excel sortieren1.578WeEf23.05.04 12:34
Re: mit VB.NET in Excel sortieren1.600DorisM23.05.04 13:15
Re: mit VB.NET in Excel sortieren1.467WeEf23.05.04 17:22
Re: mit VB.NET in Excel sortieren1.508DorisM23.05.04 17:33
Re: mit VB.NET in Excel sortieren1.665WeEf03.06.04 19:26
Re: mit VB.NET in Excel sortieren1.513DorisM03.06.04 20:39
Re: mit VB.NET in Excel sortieren1.516DorisM03.06.04 23:04
Re: mit VB.NET in Excel sortieren1.582WeEf03.06.04 21:55
Re: mit VB.NET in Excel sortieren1.546DorisM03.06.04 22:00
Re: mit VB.NET in Excel sortieren1.527WeEf03.06.04 22:07
Re: mit VB.NET in Excel sortieren1.520WeEf03.06.04 22:16
Re: mit VB.NET in Excel sortieren1.517WeEf04.06.04 21:48
Re: mit VB.NET in Excel sortieren1.703DorisM05.06.04 09:28
Re: mit VB.NET in Excel sortieren1.611WeEf05.06.04 10:49
Re: mit VB.NET in Excel sortieren1.724DorisM05.06.04 10:54

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel