captainchaos666
Goto Top

Exceldatei mit VB öffnen und bearbeiten

Hallo an alle,

mit folgendem Syntax kann ich eine Exceldatei über eine Dialogbox öffnen. Wie kann ich direkt eine Exceldatei öffnen ohne das eine Dialogfenster aufgeht öffnen, z.B möchte ich immer fest die xls-Datei in c:\temp\test.xls öffnen.

' Öffnen der Excel-Datei
APP.Tools.FileBrowser.open(".xls")
If APP.Tools.FileBrowser.FileName = "" Then WBScript.Quit
Set ExcelSheet = GetObject(APP.Tools.FileBrowser.FileName)
Set ExcelSheet = CreateObject("Excel.Application")
Set WorkBook = ExcelSheet.Workbooks.Open(APP.Tools.FileBrowser.FileName)
Set sheet = ExcelSheet.ActiveSheet

Könnt IHr mir weiterhelfen?

Gruß Alex

Content-Key: 47638

Url: https://administrator.de/contentid/47638

Ausgedruckt am: 28.03.2024 um 22:03 Uhr

Mitglied: Dani
Dani 30.12.2006 um 11:35:14 Uhr
Goto Top
Hi,
naja...Google hätte dir die Frage leicht beantwortet. Es war gleich die 1. Seite!

Dim objExcel, objWorkbook
Set objExcel = CreateObject("Excel.Application")  
Set objWorkbook = objExcel.Workbooks.Open("B:\Mappe1.xls")  
objExcel.Visible = True

Gruß
Dani
Mitglied: captainchaos666
captainchaos666 30.12.2006 um 11:59:29 Uhr
Goto Top
@Dani,
hab zwar auch in Google gesucht aber nichts gefunden! Aber trotzdem Danke!

Gruß Alex