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

Datei von Zelle aus öffnen

Forumthread: Datei von Zelle aus öffnen

Datei von Zelle aus öffnen
21.05.2022 14:28:54
Zelle
Guten Tag zusammen,
ich möchte gern von einer Datei aus eine Tabelle öffnen.
Dies funktioniert nicht:

Sub DateiOeffnen()
Workbooks.Open Range("G42").Value  'hier mal die gesuchte Datei
End Sub
mein Pfad ist c:\Firma\Rechnungen\ "hier sollte in den vorhandenen Verzeichnissen, die Datei gesucht werden"
mfg sigrid
Anzeige

19
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datei von Zelle aus öffnen
21.05.2022 16:03:55
Zelle
WAS GENAU steht in G42 ? Dateiname mit oder ohne Pfad?
AW: Datei von Zelle aus öffnen
21.05.2022 16:19:08
Zelle
Hallo,
ohne Pfad, Dateiname als xlsm.
Mit freundlichen Grüßen
Sigrid
AW: Datei von Zelle aus öffnen
21.05.2022 16:21:01
Zelle
Dann solltest du dich auch nicht wundern.
Anzeige
AW: Datei von Zelle aus öffnen
21.05.2022 16:25:49
Zelle
Ohne den genauen Pfad kann Excel die Datei nicht SO öffnen, erst recht nicht "hier sollte in den vorhandenen Verzeichnissen, die Datei gesucht werden".
Excel ist eine Tabellenkalkulation und kein Dateimanager.
AW: Datei von Zelle aus öffnen
21.05.2022 18:32:11
Zelle
Hallo Onur,
hatte ich doch in meiner Eingangsmail beschrieben.
mein Pfad ist c:\Firma\Rechnungen\
"hier sollte in den vorhandenen Verzeichnissen, die Datei gesucht werden"
Die Verzeichnisse können Jahre und/oder Monate sein.
z.B. c:\Firma\Rechnungen\ gedruckte Rechnungen WS\2022\04 April
mfg
sigrid
Anzeige
AW: Datei von Zelle aus öffnen
21.05.2022 18:39:25
Zelle
Hallo Sigrid,
Und ich habe dir geschrieben, warum es nicht funktioniert und dass es relativ kompliziert ist, einen Code zu schreiben, der funktioniert.
Hoffentlich sind jetzt alle deine Fragen (achja - du hast ja gar keine gestellt) jetzt beantwortet.
Gruß
Onur
AW: Datei von Zelle aus öffnen
21.05.2022 19:17:35
Zelle
Hallo Onur,
melde mich morgen, bin nachher eingeladen,
danke vorerst !!!
mfg sigrid
Änderung !!! Datei über Explorer suchen und öffnen
22.05.2022 09:54:43
sigrid
Guten Morgen Onur und natürlich auch die alle anderen,
ich habe mir mal alles genauer angesehen und komme zum Entschluss, die
ausgewählte Datei (per Button) über den Explorer zu suchen. (Suchfeld im Explorer oben Rechts)
Dann von da aus zu öffnen.
Habe allerdings keine Ahnung, wie es per Makro sein sollte.
mfg
sigrid
Anzeige
AW: Änderung !!! Datei über Explorer suchen und öffnen
22.05.2022 10:03:06
onur 

Sub DateiÖffnen()
Dim wb As Workbook
Dim varFileName
ChDir ThisWorkbook.Path 'Startordner einsetzen
varFileName = Application.GetOpenFilename
If varFileName = False Then Exit Sub
Set wb = Workbooks.Open(varFileName)
End Sub

Leider keine Reaktion
22.05.2022 10:44:31
sigrid
Guten Morgen Onur,
danke erst mal für das Makro !

Sub DateiÖffnen()
Dim wb As Workbook
Dim varFileName
' ChDir ThisWorkbook.path 'Startordner einsetzen
ChDir "c:\Firma\Rechnungen\"
varFileName = Application.GetOpenFilename
If varFileName = False Then Exit Sub
Set wb = Workbooks.Open(varFileName)
End Sub
Die ausgewählte Datei steht in "C10" der aktiven Tabelle, wo muss ich diese hinterlegen ?
mfg sigrid
Anzeige
Es öffnet sich nur der Explorer
22.05.2022 11:02:51
sigrid
Hallo zusammen,
leider öffnet sich nur der Explorer mit dem eingesetzten Pfad.
mfg
sigrid
Jo Onur aber
22.05.2022 18:04:42
sigrid
Hallo Onur,
jo das klappt. DANKE !!!
Ich möchte aber nicht c10 sondern das in der Spalte die selectierte Zelle,
daraus die Datei geöffnet wird.
mfg sigrid
Anzeige
AW: Jo Onur aber
22.05.2022 18:26:14
onur
Ist das jetzt ein Witz ? Und wieso sagst du zuerst "G42", dann "C10" und jetzt plötzlich "die aktive Zelle" ?
Guckst du hier:
https://www.herber.de/bbs/user/153205.xlsm
kleiner Hinweis
22.05.2022 11:50:32
sigrid
Hallo zusammen,
kleiner Hinweis.
Hinter dem Verzeichnis: c:\Firma\Rechnungen\
sind noch mehrere Verzeichnisse die durchsucht werden sollten.
So geht es nicht: "c:\Firma\Rechnungen\" & "*"
mfg sigrid
Anzeige
Probiere es mal...
22.05.2022 17:04:10
Case
Hallo, :-)
... so der Spur nach: ;-)

Option Explicit
Private Declare PtrSafe Function SearchTreeForFile Lib "imagehlp.dll" ( _
ByVal RootPath As String, ByVal InputPathName As String, _
ByVal OutputPathBuffer As String) As Long
Public Sub Main()
Dim strFileName As String
Dim strPath As String
Dim strTMP As String
strFileName = Range("G42").Value & ".xlsm"
strPath = "C:\Firma\Rechnungen\"
strTMP = FindFile(strPath, strFileName)
If strTMP  "" Then
Workbooks.Open strTMP
Else
MsgBox "Fehler - Datei oder Pfad falsch!"
End If
End Sub
Function FindFile(ByVal Path As String, ByVal File As String) As String
Dim strFile As String * 1024
If SearchTreeForFile(Path, File, strFile) Then
FindFile = Left$(strFile, InStr(strFile, vbNullChar) - 1)
Else
FindFile = ""
End If
End Function
Vorgaben:
Verzeichnis - "C:\Firma\Rechnungen\" - alle darin befindlichen Unterordner werden durchsucht.
In G42 steht bei mir z. B. "Test" ohne die Anführungszeichen UND ohne ".xlsm".
Ist das bei dir anders z. B. wenn der Dateiname MIT Dateiendung in der Zelle stht, dann musst du diese Codezeile...

strFileName = Range("G42").Value & ".xlsm"
... so schreiben:

strFileName = Range("G42").Value
Code ist getestet. ;-)
Servus
Case
Anzeige
Hallo Case, Super schnell !!!
22.05.2022 18:20:59
sigrid
Hallo Case,
es klappt bestens und schnell.
Allerdings sollte es so sein, wenn ich eine Zelle in der Spalte C ab Zelle3
selectiere, soll das Makro auch funktionieren.
mfg
sigrid
Habs rausgefunden !!! Danke an Case + Onur ! -)
22.05.2022 18:26:36
sigrid
Danke Euch beiden,
habs rausgefunden:
strFileName = ActiveCell.Value
schönen Sonntag noch !
mfg sigrid
Anzeige

Forumthreads zu verwandten Themen

Umwandlung einer Excel-Datei in eine Textdatei.
Peter

Sehr geehrte Damen und Herren,
Sie haben mir bereits schon einmal mit der Umwandlung einer Excel- in eine Textdatei geholfen. Leider gibt es sehr "pingelige" Programme, die Textdateien mit einer sehr genauen Formatierung erfordern. Ich habe Ihnen eine Datei hochgeladen, in welcher die Anspr...
13.07.2009 21:08:12
Thread-ID: 1088323
4 Beiträge
Anzeige
Fenster zum öffnen einer Datei
Patrick

Hallo zusammen,
ich habe per Rekorder eine Datei geöffnet. Leider schreibt der Rekorder genau diesen Dateinamen in das VBA-Programm.
1. Frage: Wie kann ich es hinbekommen, dass nur das Fenster geöffnet wird, der User dann die richtige Datei flexibel auswählt und dann das Programm fortge...
30.07.2009 07:57:35
Thread-ID: 1092399
12 Beiträge
Anzeige
Fehler beim öffnen einer erstellen Datei
k

Hallo,
wenn ich per Makro einen Auszug aus einer Mappe (einzelne Blätter werden in eine Neue Kopiert) mache und dieser dann einen Namen gebe wie folgt:
ActiveWorkbook.SaveAs SavePath & ADM & "_Daten_" & Date & "_" & Format(Time, "hh_mm_ss") & ".xls" 'Speichert d...
03.08.2009 10:17:53
Thread-ID: 1093141
4 Beiträge
makro - datei mit variabler Datum öffnen
meixner

Hallo zusammen,
brauche ein Makro, daß eine Datei automatisch öffnet, deren Datum sich quartalsweise ändert!
Datei = "I:\99\8801\FM\IA files \Fondsbestand_20090907"
Datei heißt im Dez. aber Fondsbestand_20091207. Kann ich das Datum irgendwie variabel anlegen?
mit Datei = "I:\99\...
03.10.2009 21:02:11
Thread-ID: 1107038
2 Beiträge
Anzeige
WORD-Datei in EXCEL-Datei umwandeln
Werner

Excel-Level: befriedigend
Hallo Freunde,
habe mal ein Frage, die sich auf Excel und Word zugleich bezieht: Was muss man tun, um ein mit WORD
erstelltes Manuskript, also eine Word-Datei, in eine Excel-Datei umzuwandeln. Die hier zur Debatte stehende WORD-Datei ist wie
folgt auf...
22.10.2009 14:24:46
Thread-ID: 1111301
7 Beiträge
Makro zum öffnen von Dateien
Dateien

Hallo zusammen,
ich habe ein kleines Problem das sich aber sicherlich mit euerer Hilfe lösen lässt. Bitte nehmt bei euren Antworten aber Rücksicht darauf, daß ich von Makros bisher überhaupt keine Ahnung habe. - Also bitte erklärt es für dumme (damit auch ich es verstehe ;-) ).
Ich habe...
22.11.2009 12:05:42
Thread-ID: 1119129
2 Beiträge
vor Einfügen einer csv-Datei Dateidatum prüfen | Herbers Excel-Forum
Jürgen
Hallo Excel - Forum,
habe ein Problem - schätzungsweise ein kleines - was ich durch Recherche nicht lösen konnte. Vielleicht könnt Ihr mir hier helfen:
Ich habe eine offene Arbeitsmappe in die ich eine csv-Datei einlesen möchte. Das ist soweit kein Problem. Ich möchte aber gerne, dass vor d...
14.01.2010 13:51:17
Thread-ID: 1129903
3 Beiträge
Makro Frage beim Öffnen von pdf Dateien verhindern
pdf

Hallo Herber Fans,
ich baue gerade an einem Code, der den Wert der ActiveCell als Dateinamen annimmt und aus einem vorgegebenen Pfad die Datei öffnen soll. Wenn keine Dateiendung angegeben ist, werden alle gängigen Endungen durchgeloopt. Bei .pdf Dateien habe ich nun das Problem, daß die Fr...
15.01.2010 17:42:31
Thread-ID: 1130350
3 Beiträge
Anzeige
Wenn Datei offen keine weitere Datei öffnen
Thomas

Hallo,
ich habe aufgrund einem sehr eigenartigen Problems und aus Performance Gründen die Idee ob es wohl möglich ist per VBA Excel anzuweisen das wenn diese Datei geöffnet ist, keine weiteren Dateien zu öffnen, also das es irgendwie gesperrt ist.
Mein Problem siehe: https://www.herber....
30.04.2010 11:41:22
Thread-ID: 1154543
3 Beiträge
Excel - Datei von Website öffnen
Website

Hallo zusammen,
möchte eine Excel - Datei von einer Website aus aufrufen per Makro.
Das untere klappt leider nicht.
Sub iShares_allinOne_equities()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim mappe5...
28.07.2010 12:04:57
Thread-ID: 1169280
2 Beiträge
Beim Öffnen der Datei Daten löschen
Sophie

Hallo Leute,
und zwar habe ich ein Makro geschrieben, dass alle Zeilen löschen soll. Wenn ich dieses ausführe dann löscht es mir auch alle Zeilen. Ich möchte aber das dies beim Öffnen der Datei geschieht, da passiert jedoch nichts. Hat jemand einen Tipp?
Sub ZeilenLöschen()
lastRowA...
19.08.2010 15:40:58
Thread-ID: 1173140
6 Beiträge
Öffnen von Excel Dateien von anderer Sprachversion
Excel

Hallo liebes Forum,
wenn ich versuche eine Excel Datei, welche mit einer anderen Sprachversion von Excel erstellt wurde zu öffnen, bekomme ich folgende Fehlermeldung:
"Excel ist auf einen Fehler gestoßen und musste einige Formatierungen entfernen, um eine Beschädigung der Arbeitsmappe...
03.10.2010 09:27:53
Thread-ID: 1179885
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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