Verweise mit VBA auf anderes Workbook

[Ulrich Weigel]

Hallo NG,
wie wird der Verweis mittels VBA auf eine andere Arbeitsmappe gesetzt?

--
Grus
Ulrich

Mail to MDLLe...@aol.com
WinXP
OfficeXP
u.v.a.

Rechtschreibfehler sind gewollt und dienen der Belustigung des Lesers

[Philipp von Wartburg]

Hallo Ulrich

So wird der Verweis gesetzt:
Application.VBE.ActiveVBProject.References.AddFromFile _
"C:\MeineDaten\MeineMappe.xls"

Anmerkung:
- Wenn der Verweis bereits existiert, erscheint der Laufzeit-
Fehler 32813.
- Wenn das VBA-Projekt der zu referenzierenden Mappe gleich
wie das aktuelle Projekt heisst, erscheint ebenfalls der Fehler
32813 (-> Defaultname "VBAProject" vermeiden!).
- Wird die Anweisung im Halte-/Einzelschrittmodus ausgeführt,
erscheint ein Hinweis "Jetzt kann nicht in den Haltemodus ge-
wechselt werden" (Dieser Hinweis kann ignoriert werden).

So kann der Verweis wieder entfernt werden:
Application.VBE.ActiveVBProject.References.Remove _
Application.VBE.ActiveVBProject.References("VBAProject")
PS: Das Entfernen richtet sich m.E. nicht an die Standards, da
der Referenz-Index als Reference angegeben werden muss, d.h.
weder "... .Remove "VBAProject"" noch "... .Remove 6" funk-
tionieren.

Gruss
Philipp

Ulrich Weigel schrieb in Nachricht ...

[Ulrich Weigel]

"Philipp von Wartburg" <philipp.vo...@bluewin.ch> schrieb im
Newsbeitrag news:3d7bc...@news.bluewin.ch...

Hallo Philipp,
Danke, das Du das gleiche schreibst, was ich getan habe, leider geht es
nicht.
Warum?
Tja, weil Weigel Blind war.
Hatte den Name wie folgt übergeben: TCpath = ThisWorkbook.Path
also vergessen & "\" & ThisWorkbook.Name anzuhängen.
Das ganze musste also heißen: TCpath = ThisWorkbook.Path & "\" &
ThisWorkbook.Name
Nun geht es auch!!
War wohl schon zu spät gestern.