Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: activeworkbook.path ... führt zu einem Laufzeitfeh

activeworkbook.path ... führt zu einem Laufzeitfeh
Peter
Hallo zusammen,
im Zusammenhang mit einer Mappe, die auf einem Netzlaufwerk liegt erhalte ich einen Fehler, der bei einer lokalen Speicherung nicht auftritt.
Wenn die Mappe vom Netzwerklaufwerk geöffnet wird, erscheint zuerst die Info "Geschützte Ansicht ... Bearbeitung aktivieren".
Wenn ich dies bestätige, dann springt Excel in mein AutoStart-Makro.
Dort lautet der erste Befehl: "strPfad = activeworkbook.path" und genau dort bleibt das Makro mit dem Laufzeitfehler 91 hängen (Objektvariable oder With-Block-Variable nicht festgelegt".
Habt Ihr eine Idee, wie ich diesen Fehler vermeiden kann?
Wenn ich den Debugger beende und das Auto-Open-Makro manuell erneut ausführe läuft es übrigens problemlos durch
Vielen Dank für Eure Hilfe und viele Grüße
Peter
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
Welche Art von Netz-LW, Pfadlänge, Code ?
05.12.2011 13:51:43
Netz-LW,
Hallo Peter,
grundsätzlich sollte das funktionieren. Vielleicht hilft uns, wenn Du etwas mehr über das "Netzlaufwerk" und den Code erzählst !?!?
- Welche Art von "Netzlaufwerk" ist das, wie ist es verbunden (Windows Share, Novell, WebDAV, Sharepoint etc.) ?
- Wie lautet die von Dir erwartete URL (Pfadlänge) ?
- Wie sieht der Code aus, in dem diese Anweisung steht in der der Fehler auftritt ?
Gruß, NoNet
Anzeige
AW: Welche Art von Netz-LW, Pfadlänge, Code ?
05.12.2011 14:21:57
Netz-LW,
Hallo NoNet,
vielen Dank für Deine schnelle Antwort.
Meinen Code kann ich ganz einfach mal posten. Er sieht so aus:
Private Sub Workbook_Open()
Dim strMyPath           As String
Dim strMyFile1          As String
Dim strMyFile2          As String
Application.ScreenUpdating = False
strMyPath = ActiveWorkbook.Path
If Right(strMyPath, 1)  Application.PathSeparator Then
strMyPath = strMyPath & Application.PathSeparator
End If
strMyFile1 = strMyPath & "Stammdaten_2011.xlsm"
strMyFile2 = strMyPath & "Rechnungen_2011.xlsm"
End Sub
Die Frage nach dem Netzlaufwerk ist schon schwieriger für mich zu beantworten ... denn da habe ich nur wenig Ahnung :-(
Ich habe in Erfahrung gebracht, dass es sich um einen Windows Share handelt, das Ganze läuft über einen Small Busines Server 2010, die Auflösung erfolgt über IP ... helfen Dir diese Infos weiter?
Vielen Dank erneut :-)
Peter
Anzeige
Hmmm - prüfe mal die Verweise
05.12.2011 14:34:55
NoNet
Hallo Peter,
Windows Share sollte grundsätzlich keine Probleme bereiten (obwohl ich SBS selbst nur vom Hörensagen kenne).
Der VBA-Code sieht auch ganz gut aus.
Meine nächste Vermutung (zumal im Code keine WITH...-Anweisung vorkommt) :
Evtl. existiert ein (ungültiger) Verweis auf eine fehlerhafte oder nicht vorhandene Datei (evtl. zu alte/neue DLL-Version).
Prüfe mal im VBA-Editor (sobald die Datei geöffnet ist) per "Extras - Verweise", ob dort ein NICHT VORHANDENER Verweis existiert. Falls ja : Deaktiviere diesen und speichere die Datei wieder.
Gruß, NoNet
Anzeige
AW: Hmmm - prüfe mal die Verweise
05.12.2011 15:14:27
Peter
Hallo NoNet,
an den Verweisen liegt's nicht ... hab' ich gerade nochmal überprüft.
Ich habe mit dem Netzwerkprofi hier gesprochen und der wollte nochmal an den Rechner drangehen ... denn von einem anderen PC aus klappt der Zugriff auf die gleiche Datei ohne den angesprochenen Fehler.
Danke für Deine Hilfe - das kann ja ganz schön kompliziert werden sobald da nicht nur lokal gearbeitet wird :-(
Viele Grüße
Peter
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige