Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 11:49:48
VAB und Bedingte Formatierung nimmt die Farbe im Makro nicht
26.04.2024 11:38:46
Acrobat PDF Formularfelder mit Excel ausfüllen
26.04.2024 11:23:04
zählen wenn - aber nur die selektierten Zeilen
26.04.2024 10:08:11
Summieren von Zellen mit bedingter Formatierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
432to436
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ThisWorkbook.Path

ThisWorkbook.Path
24.05.2004 20:54:50
Juan
Hallo Leute !
Wie kann ich eine Datei ansprechen die in Verzeichnis über ThisWorkbook.Path ist ? Also: Datei AA.xls soll aus Datei BB.xls geöffnet, dabei ist BB.xls in Unterverzeichnis von AA.xls. Direkt kann ich es nicht ansprechen weil Pfad ist nicht immer gleich.
Gruß Juan !

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

Betreff
Datum
Anwender
Anzeige
AW: ThisWorkbook.Path
25.05.2004 00:36:23
Matthias
Hallo Juan,
folgende Funktion gibt das übergeordnete Verz. zurück (oder "", wenn schon om obersten Verz.):

Function PathUp() As String
Dim p As String
Dim i As Integer
p = ThisWorkbook.Path
For i = Len(p) To 1 Step -1
If Mid(p, i, 1) = "\" Then Exit For
Next i
If i = 0 Then
PathUp = "" 'kein Übergeordnetes Verz. vorhanden
Else
PathUp = Left(p, i - 1)
End If
End Function

Gruß Matthias
AW: ThisWorkbook.Path
25.05.2004 09:18:54
Juan
Danke Matthias !
Bis Heute abend kann ich es nicht testen.
Gruß Juan
AW: ThisWorkbook.Path
Ulf
Ulf
Anzeige

14 Forumthreads zu ähnlichen Themen

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
Anzeige
Thisworkbook.Path (Dateikonvertierung xlsm zu xls)
Mexsalem

Hallo,
da ich noch Excel 2003 verwende, muss Excel mir eine xlsm-Datei in das Excel 2003-er Format xls konvertieren. Soweit kein Problem dank des Microsoft Office Compatibility Pack für Dateiformate (http://www.microsoft.com/de-de/download/details.aspx?id=3).
Jedoch soll beim Workbook.O...
03.11.2013 20:01:47
Thread-ID: 1336974
12 Beiträge
ThisWorkbook.Path
Paul
Hallo,
ich habe Probleme mit einem Makro das ich geschrieben habe. Es erstellt aus meiner Dienstplantabelle heraus eine CSV-Datei. Nun möchte ich das diese Datei im gleichen Ordner wie die Ursprungsdatei gespeichert wird. Da die Dienstplatabelle einige Kollegen nutzen die die Tabelle an untersc...
27.06.2015 10:05:30
Thread-ID: 1433490
10 Beiträge
Anzeige
ThisWorkbook.Path auf Netzlaufwerk
Chris

Hallo liebe Excel und VBA Gemeinde,
könnt Ihr Euch mal bitte das Skript anschauen. Wenn ich es lokal ausführe funktioniert es. Wenn ich aber die Dateien auf ein Netzlaufwerk lege, schmiert Excel ab. Was muss ich ändern, damit das Skript auch auf Netzwerklaufwerken funktioniert?
Als vert...
08.08.2019 11:57:34
Thread-ID: 1706564
24 Beiträge
Dr. Watson bei ThisWorkbook.Path
Holger
Hallo!

wenn ich versuche einen relativen Pfad zum Aufruf einer Datei im VBA Code mittels act_path = ThisWorkbook.Path zu beschreiben, stürzt Excel ständig ab (NT - Dr. Watson), wahrscheinlich irgendeine Zugriffsverletzung, aber damit kenne ich mich nicht aus.

Gibt es Abhilfe?
16.12.2003 09:51:10
Thread-ID: 352474
6 Beiträge
ThisWorkbook.Path, Da ist noch der Wurm drin
Steffi

Hallo,
habe ich das Richtig verstanden ?
Etwa so:
Private Sub CommandButton13_Click() 'Felge OpenFile ("D:\Felgenblatt\Felge1.gif") [ALT] End Sub
OpenFile Pfad = ThisWorkbook.Path & "\Felgenblatt\Felge1.gif" [NEU]
Bitte um kurze Rückantwort
Danke Steffi
13.12.2004 21:10:48
Thread-ID: 532450
2 Beiträge
ThisWorkbook.Path mit Unterordner
edie

Hallo Zusammen,
benötige Hilfe für folgendes Problem:
sPath = ThisWorkbook.Path so erweitern damit der Daten-Import
aus dem Unterordner "Planung" statt windet.
Habe probiert: sPath = ThisWorkbook.Path & "\Planung\"
funktioniert nicht. Kann mir jemand helfen?
Hier d...
17.09.2007 21:38:00
Thread-ID: 908148
4 Beiträge
ThisWorkbook.Name / zwei VBA Projekte / XLT
Mattias

Hi zusammen
Ich habe eine Exceltabelle "Vorlage.xls" sowie "Addin.xlt". Die Datei Addin lade ich im Excel über den Add-Ins-Manager ein, die Datei wird also immer geladen sobald ich Excel öffne. Sie enthält eine selber kreierte Symbolleiste u.a. mit einem Button "speichern". Nun möchte ich d...
28.09.2007 16:25:00
Thread-ID: 911544
5 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
4
11
9
6
23
5
1
3
4
5
2
5
6