[VB6] Excel-Datei mit Excel öffnen

[xCtrl]

Hinweis: Prioität des Todes - also wichtig!

Ich möchte durch einen Klick auf ein Button eine Excel-Datei in Excel öffnen.

joa - nur wie?

Die Datei an sich wird vom VB Programm schon an einem anderen Punkt erstellt, und zwar mit app.path & "\datei.csv" im Programmordner, wo sich mein Projekt befindet. Nun möchte ich, dass durch das klicken auf einen Button genau diese Datei in Excel geöffnet wird.

Möchte mir da kurz einer zur Hand gehen?

[mrshadowtux]

Shell("excel.exe" & app.path & "\datei.csv")

Oder so in der Art ging das glaube ich. Meine VB-Zeit ist lang vorbei leider.

[xCtrl]

hmm irgendwie auch nicht aber trotzdem danke

dann muss ich jetzt nach gut 3 tagen sucherei mein Programm ohne die Funktion lassen

[Vicky]

wenn dann eher so

Shell("%PROGRAMFILES%\Microsoft Excel\excel.exe " & app.path & "\datei.csv")

genauen programmpfad musste halt selber rausfinden, hab kein excel

[mrshadowtux]

Also unter Program Files liegts glaube ich in Microsoft Office statt Microsoft Excel. Schau am besten mal bei der Verknüpfung zu Excel im Startmenü, wo die hinzeigt.

[thosch97]

Hats bei Windows nich sowas wie which(1)?

[mrshadowtux]

Nicht dass ich wüsste. Leider.

[xCtrl]

hmm mit %programfiles% wird das nix

[gandro]

Und wenn du "start" als Shell-Befehl nimmst?

[DosAmp]

Sprich Excel am besten gleich über COM an, dann funktionierts auch, wenn Office nicht in den Standardpfad installiert wurde:

http://www.vbarchiv.net/faq/faq_vbvba_excel.html

Code:

Set appExcel = CreateObject("Excel.Application")
appExcel.Workbooks.Open(App.Path & "\datei.csv")
appExcel.Visible = True

(Wenn du über CreateObject herangehst, brauchst du auch keine Referenz auf eine Excel-Klasse im VB-Projekt setzen – das dort gezeigte Beispiel lädt Excel zudem schon beim Programmstart.)