Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
864to868
864to868
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ActiveWorkbook.Path Problem

Forumthread: ActiveWorkbook.Path Problem

ActiveWorkbook.Path Problem
26.04.2007 11:47:00
wulfjack
Ich habe folgendes Problem:
Auf einem Intranet-Server befindet sich eine kleine HTML-Datei die zu verschiedenen Excel-Anwendungen verlinkt.
Diese Excel-Anwendungen liegen aber nicht auf dem Intranet-Server (IIS-Server), sondern auf einem anderen, im
Netzwerk befindlichen Server (hier "NetzwerkServer" genannt)
Der Link auf dieser HTML-Seite lautet:
file://NetzwerkServer/Verzeichnis/Haupt.xls
Soweit funktioniert das auch alles.
Nun wird in der Haupt.xls ein VB-Script ausgeführt, welches eine weitere Excel-Datei, die im gleichen Verzeichnis
auf dem "NetzwerkServer" liegt öffnen soll.
Im Script lautet die entsprechende Anweisung:
Workbooks.Open Filename:=ActiveWorkbook.Path & "\Unterformular.xls"
aber "ActiveWorkbook.Path" scheint hier nicht zu funktionieren, da die Ausführung wohl auf dem Intranet-Server
stattfindet ( Vermutung von mir ).
Gibt es dennoch eine Lösung ?

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ActiveWorkbook.Path Problem
26.04.2007 23:06:49
Bräuer
Hallo
wenn Du mal die Makro aufzeichnung probierst
also Deine Haupt.xls starten
und mal ein Makro Aufzeichnen
[deine Unterformular.xls] öffnen
das Makro stoppen und dir mal den Code anschaun .
mit Pfadangaben auf dem Sever ist das so eine Sache !!!
und es funzt nicht so wie bei HTML
mit etwas Glück sind wir der Sache näher

Anzeige
AW: ActiveWorkbook.Path Problem
27.04.2007 08:33:00
wulfjack
Die Aufzeichnung eines Makros funktioniert leider auch nicht so richtig. Es wird scheinbar während dem manuellen Öffnen nichts aufgezeichnet... Das Ergebnis seht nämlich so aus:

Sub AA()
' AA Makro
' Makro am 27.04.2007 von Wolfgang Koehler aufgezeichnet
End Sub


Schade.....
es muss doch irgendeine Möglichkeit geben den absoluten Pfad auch ohne Laufwerksangabe ( z.B. F: ) zu machen. Habe aber schon alles probiert. Statt ActiveWorkbook.Path habe ich z.B.
\\NetzwerkServer\Verzeichnis\Unterformular.xls oder
file:///\\NetzwerkServer\Verzeichnis\Unterformular.xls (so kann man's im IE öffnen)

Anzeige
AW: ActiveWorkbook.Path Problem
27.04.2007 12:22:13
Bräuer
Hallo
also Deine Haupt.xls starten
und mal ein Makro Aufzeichnen
[deine Unterformular.xls] öffnen und zumachen
über Datei -> Öffnen 

Sub Makro1()
' Makro1 Makro
' Makro am 27.04.2007 von Bräuer aufgezeichnet
Workbooks.Open Filename:="C:\daten\farbe.xls"
ActiveWorkbook.Close
End Sub


versuchs bitte nochmal über Datei Öffnen
Gruß Thomas

Anzeige
;

Forumthreads zu verwandten Themen

ActiveWorkbook.Path ohne Tilde
smi

Hallo,
ich habe folgendes Problem: Ich lese mit strPfad = ActiveWorkbook.Path den Pfad einer geöffneten Datei aus. Als Ergebnis bekomme ich angegeben:
"Q:\PRODUK~1" anstelle von "Q:\Produktiv"
Kann ich verhindern, dass mit der Pfad mit Tilde ausgegeben wird oder gibt es eine andere...
02.04.2009 08:33:37
Thread-ID: 1066181
5 Beiträge
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".
05.12.2011 13:51:43
Thread-ID: 1240679
5 Beiträge
Anzeige
VBA Hyperlink zu ActiveWorkbook versenden
MB12

Hallo zusammen,
diese Makro möchte ich gerne so abändern, dass ich lediglich einen Hyperlink zum ActiveWorkbook versende.
Falls es damit kompliziert würde - vielleicht hat jemand ein ganz anderes Makro?
Private Sub CommandButton5_Click() 'Info an Team ' Excel_Workbook_via_Outlook_...
17.01.2018 08:00:50
Thread-ID: 1602704
3 Beiträge
VBA ActiveWorkbook.SaveAs Problem
Matthias der 2. (hier im Forum)
Hallo zusammen,

habe mir ein kleines Makro geschrieben, welches eine XLS-Datei umformt und auf einen passwortgeschützten FTP-Server ablegen soll.

Folgende Codezeile:

ActiveWorkbook.SaveAs Filename:="ftp://www.ftp-server.de/verzeichnis/datei.csv", FileFormat:=xlCSVMSDOS, Cr...
30.12.2003 10:54:29
Thread-ID: 356931
3 Beiträge
ActiveWorkbook.SaveCopyAs sPath & sFile
Jörg

Hallo,
nach dem ich die Zeile in mein Makro eingefügt habe, überschreibt Excel vorhandene Dateien gleichen Namens ohne Rückfrage beim Speichern. Kann ich dazu eine Dialogbox einbauen und wenn ja wie?
Gruß Jörg
25.09.2006 20:29:16
Thread-ID: 805369
3 Beiträge
ActiveWorkbook.Path mit unterschiedlichem Resultat
heinzs

Hallo,
folgender Code wird durch Klick auf einen Button ausgeführt:
'eMail Empfänger und Betreff einlesen
gn_an1 = Sheets("Zeitraum").Cells(4, 2)
gn_an2 = Sheets("Zeitraum").Cells(4, 3)
gn_an3 = Sheets("Zeitraum").Cells(4, 4)
gn_an4 = Sheets("Zeitraum").Cells(4, 5)
...
11.12.2007 17:16:44
Thread-ID: 934068
3 Beiträge
Code nach "ThisWorkbook" automatisch per VBA
Wicki

Hallo,
ich möchte ausschließlich automatisch Code per VBA nach "ThisWorkbook" einer anderen Mappe übertragen. Der Code liegt als Export-Datei (name.cls) vor. Wenn ich den importiere wird er als Klassenmodul "DieseArbeitsmappe1" angelegt und nützt mir damit nichts.
Hat jemand eine Idee ?...
12.03.2009 23:16:35
Thread-ID: 1059712
5 Beiträge
ActiveWorkbook.Path ohne Tilde
smi

Hallo,
ich habe folgendes Problem: Ich lese mit strPfad = ActiveWorkbook.Path den Pfad einer geöffneten Datei aus. Als Ergebnis bekomme ich angegeben:
"Q:\PRODUK~1" anstelle von "Q:\Produktiv"
Kann ich verhindern, dass mit der Pfad mit Tilde ausgegeben wird oder gibt es eine andere...
02.04.2009 08:33:37
Thread-ID: 1066181
5 Beiträge
Anzeige
ActiveWorkbook.SaveAs
Larissa

Hallo,
jetzt habe ich doch noch eine Frage.
In meinem Makro habe ich die Funktion: ActiveWorkbook.SaveAs 'Name_Datum'
Die Datei wird dann in Eigene Dateien abgespeichert. Wenn an diesem Platz schon eine Datei mit diesem Namen vorliegt, kommt die typische Abfrage, ob die Datei übers...
12.09.2009 17:32:49
Thread-ID: 1102264
3 Beiträge
ActiveWorkbook.SaveAs Filename
Sandra

Hallo zusammen,
ich habe mal wieder ein Problem.
Mit dem nachfolgenden Code lasse ich automatisch speichern.
Dim Dateiname As String
Dateiname = oXlSM.Name
ActiveWorkbook.SaveAs Filename:="\\xxxx\Dokumentation\" & Dateiname & ".xml"
Das klappt auch fast. Allerdin...
21.06.2011 16:49:35
Thread-ID: 1219171
3 Beiträge
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".
05.12.2011 13:51:43
Thread-ID: 1240679
5 Beiträge
VBA _pivate_sub save as
Volker

Hallo,
ich habe ein Problem beim Speichern einer Excel Datei. Habe ein Makro im Internet gefunden, dieses eingebaut, funktioniert wunderbar ABER jetzt wird bei jedem speichern das Dialogfeld "Save as" aufgemacht.
ISt es möglich hier eine Abfrage einzubauen, welche prüft ob der Dateinam...
25.04.2012 07:38:29
Thread-ID: 1260797
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige