Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fehler nach Sortierung in Excel
Autor: ReinerG
Datum: 04.07.03 08:55
Hallo, ich habe ein Problem, bei dem ich völlig ratlos bin. Ich erstelle in VB (VB 6 SP 5) aus einer Datenbank über DA0 3.6 Exceltabellen (Excel 2000). Die erstellten ExcelTabellen werden in einer Filelistbox gelistet. Die Tabellen können mit dblclick auf die Filelistbox geöffnet werden. Private Sub FileAngebote_DblClick() Dim sFile As String With FileAngebote If .ListIndex >= 0 Then sFile = .Path & IIf(Right$(.Path, 1) <> "\", "\", "") & .List(.ListIndex) ShellExecute Me.hWnd, "open", sFile, "", "", 1 Else MsgBox ("Wählen Sie zuerst eine Tabelle aus, die Sie bearbeiten möchten !") End If End With End sub Soweit so gut. Sobald ich die Exceltabelle vor dem Speichern und Schließen mit folgenden Code sortiere : xlsheet.Range("A3:B" & i).Sort Key1:=Range("A3"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom xlSheet.SaveAs PfadAngebote & "TechnischeDaten.xls" xlBook.Close xlApp.Quit Set xlApp = Nothing Set xlBook = Nothing Set xlSheet = Nothing lässt sich Excel zwar noch öffnen, zeigt sich aber transparent. Es ist nur noch die Menüleiste, die Symbolleiste und am Ende die Statusleiste zu sehen, der Bereich der Tabelle ist transparent. Es bleibt die Form von VB zu sehen ( oder der Desktop, wenn ich VB minimiere) Beende ich das VB - Projekt und starte es neu, dann funktioniert es einwandfrei. Lasse ich die Sortierung weg, funktioniert es ebenfalls einwandfrei. Ich bin völlig ratlos. Wäre klasse, wenn einer weiß woran es liegt. Gruß Reiner

Fehler nach Sortierung in Excel	635	ReinerG	04.07.03 08:55
Re: Fehler nach Sortierung in Excel	408	RalfH	04.07.03 13:58
Re: Fehler nach Sortierung in Excel	407	ReinerG	04.07.03 14:44

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übersicht

Suchen