Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Problem beim Verpacken
Autor: spider10
Datum: 21.11.06 16:57
Hallo Leute, habe folgendes Problem: in VB 6.0 funktioniert der Aufruf einer Excel Datei. Wenn ich aber das Prog verpacke erhalte ich Laufzeitfehler Nr.: 5 Hier mein Code: Command Button: Dim PfadzuExcel2 As String Dim sFilename2 As String sFilename2 = App.Path & "\angebot.xls" Dim X As Long PfadzuExcel2 = AnwendungFuerDatei2(sFilename2) Text1 = sFilename2 With Text1 X = Shell(PfadzuExcel2, vbHide) On Local Error Resume Next .LinkMode = 0 .LinkTopic = "excel|system" .LinkMode = 2 .LinkExecute "[Open(""" + sFilename2 + """)]" End With Me.Command1.Visible = False End Sub Modul: Public Function AnwendungFuerDatei2(ByVal Datei As String) As String Dim Pfad As String Pfad = App.Path & "\Angebot.xls" FindExecutable Datei, vbNullString, Pfad If Pfad <> "" Then Pfad = Left$(Pfad, InStr(Pfad, vbNullChar) - 1) End If If UCase$(Pfad) = UCase$(Datei) Then Pfad = "" AnwendungFuerDatei2 = Pfad End Function Ich bin für jede Hilfe dankbar. Gruß aud Österreich Norbert

Problem beim Verpacken	606	spider10	21.11.06 16:57
Re: Problem beim Verpacken	362	effeff	22.11.06 09:47
Re: Problem beim Verpacken	352	BAStler	22.11.06 10:26

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