Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1108to1112
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
Inhaltsverzeichnis

2 probleme in VBA

2 probleme in VBA
alex
Hallo liebe excel veteranen
ich habe 2 probleme bei denen ich nicht weiter komme
1. wie muß ich ein makro programmieren damit eine datei aus einem unterordner eine andere datei aus einem übergeordneten ordner öffnet ohne dabei den kompletten pfad einzugeben. beispiel:
die datei mit dem makro liegt in Z:\wartungslisten\wartung aktuell\bma vds\vorlage.xls
die datei die geöffnet werden soll liegt in Z:\wartungslisten\wartung aktuell\wartung.xls
ich möchte wenigstens c:\wartungslisten nicht eingeben müssen als pfad. da sich bei uns jeh nach arbeitsplatz die dateien entweder in Z:\st\wartungslisten\... oder in Z:\wartungslisten\... befinden
2. ich brauch ein makro das einen wert in einer zelle (c11) von mappe A mit den werten einer spalte (A) in mappe B vergleicht und bei einem treffer in der selben zeile wo der wert gefunden wurde 6 spalten weiter das heutige datum schreibt.
vielen dank im vorraus für eure hilfe

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

Betreff
Benutzer
Anzeige
AW: 2 probleme in VBA
19.10.2009 23:14:37
OttoH
Hallo Alex,
mit Activeworkbook.path bekommst Du den Pfad der aktuellen Mappe.
Daraus muss dann der übergeordnete Pfad ermittelt werden.
Probiere mal folgendes MAkro aus:
Sub Ordner()
Dim Pfad As String
Dim i As Integer
Dim Pos As Integer
Pfad = ActiveWorkbook.Path
For i = Len(Pfad) To 1 Step -1
If Mid(Pfad, i, 1) = "\" Then
Pos = i - 1
Exit For
End If
Next
MsgBox Left(Pfad, Pos)
End Sub

Gruß OttoH
1. Problem
19.10.2009 23:16:21
MichaV
Hallo,
Du solltest nie 2 Fragen in einem Beitrag stellen.
Lösung 1. Frage: Relative Pfadangaben:
../ ist ein Verzeichnis höher
../../ ist zwei Verzeichnisse höher usw.
Workbooks.Open ("../kontakte.xls") öffnet Datei kontakte.xls im übergeordneten Verzeichnis.
Gruß- Micha
Anzeige
AW: 2 probleme in VBA
21.10.2009 21:48:31
alex
danke für eure tipps hat mir super geholfen
ich werde das 2. problem nochmal extra posten
gruß alex

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige