Office: Datei "unsichtbar" öffnen und Dateiname auslesen

Hallo,

ich möchte per Dialog aus einer Arbeitsmappe heraus eine andere Arbeitsmappe öffnen, damit ich ich später per SVERWEIS die darin enthaltenen Daten im Hintergrund auslesen kann.

Das öffnen dieser Datei klappt auch wie folgt:
Code:

Dabei wird die geöffnete Arbeitsmappe jedoch angezeigt, was ich nicht will. Kann mir jemand sagen, wie ich die Arbeitsmappe unsichtbar halte?

Zudem muss ich für spätere Functions den Dateinamen der geöffneten Datei haben. Weiß jemand, wie ich den im Rahmen des Öffnen-Dialogs auslesen kann?

Vielen Dank im Voraus.

:)

 

Hi,

versuchs mal mit folgendem Code:

Sub test()
Dim Datei
Set Datei = GetObject("C:\Mappe2.xls")
MsgBox Datei.Name
End Sub

Die Datei Mappe2 wird ausgeblendet geöffnet!

 

Danke, aber in diesem Beispiel muss ich den Pfad angeben. Das soll ja mittels Dialog gelöst werden.

 

hiho

hier ein Versuch

Code:

wenn es Dir nur um den Namen geht

Code:

 

Moin Craig,

dieser Code sollte deine Vorstellung treffen.

Code:

 

Hi,

dann bspw. so:

Sub test()
Dim Datei
Application.ScreenUpdating = False
Application.Dialogs(xlDialogFindFile).Show
Set Datei = ActiveWorkbook
ActiveWindow.Visible = False
Application.ScreenUpdating = True
MsgBox Datei.Name
End Sub

 

Danke euch allen.

Ich habe es wie folgt gelöst:

Code:

Danke an alle.

 

Nun denn,

das unsichtbar halten der Datei scheint nun keine Rolle mehr zu spielen ...