Visual Basic Forum

VB_Newbie · Newbie Anmeldedatum: 18.03.2011 Beiträge: 3

Hallo liebe Programmierergemeinde!

Die Eckdaten:
Ich schreibe gerade ein Programm, das im Hintergrund eine Exceldatei mitlaufen lässt, in die Daten abgelegt und aus der Daten exportiert werden. Da ich mir VB.NET größtenteils selber beigebracht habe, kann es durchaus passieren, dass ich Anfänger-Fehler mache!

Das Problem:
Es kann ein Fall auftreten, bei dem eine Zeile herausgelöscht werden muss. Ist ja mit .ClearContents() keine große Sache. Jetzt kommt aber das Problem. Um anschließend nicht eine leere Zeile in der Tabelle zu haben, möchte ich ein Range, das alle Daten umfasst, nach Spalte B sortieren. Dabei kommt die leere Zeile dann ohnehin ans Ende und stört nicht mehr.

Mit der Sort-Funktion habe ich meine Probleme!

Der Key soll vorgeben, nach welcher Spalte sortiert wird. Das ist bei mir B.
Mein Aufruf sieht damit so aus:
(With .Worksheet)
.Range(.Cells(2, 1), .Cells(zeile_max, spalte_max)).Sort(.Range(.Cells(2, 2), .Cells(2, 2)).EntireRow)

Dabei kommt aber nichts vernünftiges raus. Er sortiert jetzt Zeile für Zeile die Spalten aufsteigend, was ja nicht der Standarteinstellung entspricht. Wenn ich die Optionen, die im MSDN Eintrag erwähnt werden, in die Parameterliste aufnehme, wirft er eine Exception. Z.B. bei Excel.XlOrientation.xlDownward kommt der Error Code -2146827284, die Sort-Methode konnte nicht ausgeführt werden.

Hat hier jemand Erfahrung mit der Sort Funktion aus VB.NET heraus? Kann mir vielleicht jemand einen Tipp geben, was ich falsch mache oder wie ich das Problem angehen könnte?

Vielen Dank schon im Voraus für die Hilfe! Sitze jetzt seit einem halben Tag an dem Problem und komm einfach nicht voran...