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

Verzeichnis einer Arbeitsmappe Ermitteln?

Forumthread: Verzeichnis einer Arbeitsmappe Ermitteln?

Verzeichnis einer Arbeitsmappe Ermitteln?
18.09.2003 13:11:34
Walter
Hallo zusammen!
Ich bin noch VBA-Anfänger und habe folgendes Problem:
In einer Arbeitsmappe soll beim Betätigen eines benutzerdefinierten Buttons eine weitere Arbeitsmappe geöffnet werden, die im gleichen Verzeichnis steht. Ist auch normalerweise kein großes Problem.
Im vorliegenden Fall soll die Mappe aber auf einem Netzlaufwerk stehen, dem jeder Benutzer seinen eigenen Laufwerksbuchstaben zuordnen kann (bei mir heißt das Laufwerk z.B. "O:\", bei meinem Kollegen "V:\").
Daher benötige ich eine Funktion, die mir das Verzeichnis ausgibt, in dem die aktuelle Arbeitsmappe steht (bei mir also z.B. "O:\daten\artikel\" und bei meinem Kollegen "V:\daten\artikel\"). Gibt es so etwas? Oder habt Ihr andere Vorschläge?
Viele Grüße
Walter
Anzeige

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

Betreff
Datum
Anwender
Anzeige
ThisWorkbook.Path oT
18.09.2003 13:16:08
Dieter Maj
AW: Verzeichnis einer Arbeitsmappe Ermitteln?
18.09.2003 13:19:46
Roland Hochhäuser
Hallo Walter,

wenn beide(!) Mappen im gleichen Ordner stehen, dann ersetze den festen Ordner im Makro durch ActiveWorkbook.Path, dann müsste es gehen.

Gruß
Roland
AW: Verzeichnis einer Arbeitsmappe Ermitteln?
18.09.2003 13:20:48
xXx
Hallo,
dafür brauchst du die Netzwerknamen der Laufwerke. \\server\Laufwerk

Hier die entsprechende Funktion (in ein Modul kopieren):
Public 

Function GetUNCName(ByVal Path As String) As String
Dim UNC As String * 512
If Len(Path) = 1 Then Path = Path & ":"
If Right$(Path, 1) <> "\" Then Path = Path & "\"
If WNetGetConnection(Left$(Path, 2), UNC, Len(UNC)) Then
MsgBox "Es trat ein Fehler auf oder Sie haben versucht eine lokal gespeicherte Datei einzubinden!"
Else
GetUNCName = Left$(UNC, InStr(UNC, vbNullChar) - 1) & Mid$(Path, 3)
End If
End Function


Aufruf: =getuncname("O:")

Gruß aus'm Pott
Udo
Anzeige
Danke!!!
18.09.2003 13:32:50
Walter
Das ging ja wirklich fix.
Sorry für die dumme Frage...
;

Forumthreads zu verwandten Themen

Die Arbeitsmappe kann nicht geschlossen werden!
Andreas

Die Arbeitsmappe kann nicht geschlossen werden, da sie von einer anderen
Arbeitsmappe verwendet wird!"
Diese Meldung bekomme ich in Excel 2007, wenn ich in meinem VBA- Code
"workbooks.close" verwende.
Es sind aber keine weiteren Mappen geöffnet, kann mir da jemand weiterhelfen?<...
13.08.2008 20:56:05
Thread-ID: 1001659
2 Beiträge
Spalten Ausblenden in freigegebener Arbeitsmappe
Marco

Hallo,
ich möchte gerne in einer freigegeben Arbeitsmappe bestimmte Spalten per Klick auf ein Symbol aus- und wieder einblenden können.
Mein Problem ist der Blattschutz in der freigegebenen Arbeitsmappe. Aufgrund meiner bescheidenen VBA-Kenntnisse, weiß ich nicht, an welcher Stelle des...
17.08.2008 22:56:20
Thread-ID: 1002488
3 Beiträge
Anzeige
daten aus Arbeitsmappe einlesen
Peter

Hallo,
kurze Fragestellung an die Experten. Habe mir einen Code zusammengebastelt, der in einer geöffneten Arbeitsmappe, bestimmte Daten aus einer anderen noch "unbestimmten" Arbeitsmappe importieren soll. Funktioniert auch, jedoch kommt mir der Code zu unübersichtlich und auch "unsauber" v...
19.08.2008 13:25:00
Thread-ID: 1002916
3 Beiträge
Anzeige
Freigegebene Arbeitsmappe - Datenmanipulation
Meier

Hallo NG,
ich habe eine Excel-Tabellemit einem UserForm, zur Dateneingabe und Änderung in einem Tabellenblatt.
Der User öffnet die Tabelle, das Blatt ist geschützt. Dann hat er in der CommandBar einen Button zum Aufruf eines UserForms. Damit lassen sich die Daten ändern, neue Daten hinz...
02.09.2008 15:06:00
Thread-ID: 1006814
6 Beiträge
Tabellenblätter in neue Arbeitsmappe kopieren
Christian

Hallo!
ich möchte gerne per makro aus einer datei mit ca. 70 tabellenblättern 11 Blätter auswählen und in eine neue Mappe kopieren, am besten sollten auch gleich noch die verküpfungen (in der neuen mappe) gelöscht werden.
Die zu kopierenden Blätter sind nicht hintereinander, also quer ü...
10.09.2008 16:37:00
Thread-ID: 1008845
6 Beiträge
Arbeitsblaetter aus Datei in Arbeitsmappe kopieren
Benjamin

Hallo erstmal,
normalerweise lese ich immer nur und finde alle loesungen, diesmal hab ich einfach nichts gefunden.
Ich wuerde gerne als sehr vielen Dateien immer das komplette dritte Arbeitsbaltt kopieren und in einer neuen Arbeitsmappe untereinander einfuegen. Hab auch schon einen ansa...
16.09.2008 06:03:00
Thread-ID: 1009929
2 Beiträge
Anzeige
Daten aus Zellbereich in eine neue Arbeitsmappe
André

Für eine "Tägliche Auswertung" suche ich ein Makro.
Meine erste Idee war es, hier im Forum zu suchen, ob es da nicht schon was gibt. Leider erfolglos. Ich hab zwar Makros gefunden, die ein neues Wks erstellen mit genau den Vorgaben, die ich brauche und ein Makro zum Zellenbereich kopieren,...
26.09.2008 10:23:00
Thread-ID: 1012532
3 Beiträge
Arbeitsmappe drucken - Reihenfolge der Seiten
Peter

Hallo zusammen,
noch ein seltsames Problem: ich habe einen CommandButton mit einem Code hinterlegt, der mir bestimmte Tabellenblätter ausdrucken soll.
Ich habe auf meinem ersten Tabellenblatt Auswahlknöpfe. Je nachdem, welcher Button aktiv ist, sollen andere Blätter gedruckt werden. Bei...
02.10.2008 11:57:00
Thread-ID: 1013841
8 Beiträge
Neue Arbeitsmappe aus AddIn erstellen
wernernico

Hallo,
ich hab da mal wieder ein kleines Problem...
Ich habe ein AddIn, das neben Code auch mehrere Tabellenobjekte enthält. Nun möchte ich ein neues WorkBook erstellen, das die Tabellen aus dem AddIn enthält. Ich habe es bisher auf folgende Weise probiert:
Set Tempbook = DieseArbei...
06.10.2008 09:55:00
Thread-ID: 1014338
3 Beiträge
Zuerst Makro ausführen, dann Arbeitsmappe anzeigen
fga

Hallo
Ich habe ein ziemlich umfangreiches Makro das beim Öffnen der Arbeitsmappe ausgeführt wird.
Das Makro muss in verschiedenen Tabellenblättern Bereiche selektieren und Berechnungen durchführen und die Ergebnisse wieder eintragen.
So habe ich unter anderem folgender Code für vers...
21.10.2008 12:15:11
Thread-ID: 1017932
3 Beiträge
Zuerst Makro ausführen, dann Arbeitsmappe anzeigen
fga

Hallo
Ich habe ein ziemlich umfangreiches Makro das beim Öffnen der Arbeitsmappe ausgeführt wird.
Das Makro muss in verschiedenen Tabellenblättern Bereiche selektieren und Berechnungen durchführen und die Ergebnisse wieder eintragen.
So habe ich unter anderem folgender Code für vers...
21.10.2008 12:51:00
Thread-ID: 1017941
5 Beiträge
Code per VBA in "Diese Arbeitsmappe"
Timo

Hallo,
mir ist bekannt, wie ich per VBA ein neues Modul anlegen und eine Sub erzeugen kann.
Ich möchte nun aber per VBA eine sub in "Diese Arbeitsmappe" erzeugen und mit einer zweiten Prozedur wieder löschen.
Geht das?
Ich habe im Archiv nichts relevantes hierzu gefunden.
V...
29.10.2008 11:37:00
Thread-ID: 1020207
6 Beiträge

Beliebteste Forumthreads (12 Monate)

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