Hilfe! Separate Exceldatei öffnen.

Bild

Betrifft: Hilfe! Separate Exceldatei öffnen. von: Tino
Geschrieben am: 20.03.2005 12:31:27

Hallo,
über eine VBA Befehl wird eine Excel Datei
geöffnet, aber diese öffnet immer in der gleichen
Mappe. Ist es möglich, diese in einer neuen
unabhängige Mabbe zu öffnen? Da andere Makros
diese immer beeinflussen!
Bitte helft mir!

ChDir "c:\VersuchPräsen\Versuch"

Workbooks.Open Filename:="c:\VersuchPräsen\Versuch\neu.xls"

Bild


Betrifft: AW: Hilfe! Separate Exceldatei öffnen. von: Nepumuk
Geschrieben am: 20.03.2005 15:07:52

Hallo Tino,

klar geht das:


Option Explicit

Public Sub test()
    Dim myXL_Application As Object
    Set myXL_Application = CreateObject(Class:="Excel.Application")
    myXL_Application.Workbooks.Open "D:\Eigene Dateien\Eigene Excelformeln\Datum_plus_minus_10_Tage.xls"
    myXL_Application.Visible = True
    Set myXL_Application = Nothing
End Sub


Du hast aber auf diese Mappe, von der sie öffnenden, keinen Zugriff auf Daten oder Makros.

Diese Konstruktion:

ChDir "c:\VersuchPräsen\Versuch"
Workbooks.Open Filename:="c:\VersuchPräsen\Versuch\neu.xls"

ist übrigens unsinnig. Du gibst den Pfad in der Open - Methode explizit an. Daher kannst du dir die CHDir - Anweisung sparen.

Gruß
Nepumuk


Bild


Betrifft: AW: Hilfe! Separate Exceldatei öffnen. von: tino
Geschrieben am: 24.03.2005 18:32:29

Danke, Funtioniert und Danke für den hinweis 'chdir...

Gibt es keine möglichkeit diese anzusteuern?

Vieleicht beim öffnen wenigstens ein bestimmtes
Registerblatt zu aktivieren.

Tino


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Rechnen mit Zeit in Userform"