Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
340to344
340to344
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

öffen mit unv. Dateinamen

Forumthread: öffen mit unv. Dateinamen

öffen mit unv. Dateinamen
21.11.2003 13:08:55
atikar
Hallo Leute,

ich möchte Dateien öffne, von denen aber nur 1 Teil bekannt ist, es gibt keine doppelnennungen in dem Ordner.

beispiel:

hall.opu
will.sep
dall.nap

jetzt soll von obigen dateien eine geöffnet werden wenn nur ein teil des namens bekannt ist.
z.B. nur hall dann soll hall.opu geöffnet werden
oder nur sep dann soll will.sep geöffnet werden.

mein macro kann auf jeden fall unterscheiden ob der eingegebene name vor oder nach dem punkt steht, blos wie ergänze ich den rest?

geht sowas.

ciao

atikar
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: öffen mit unv. Dateinamen
21.11.2003 13:23:11
Nayus
Hallo,
anbei eine (noch unvollständige Sub), die Dateien öffnet, die einem Suchkriterium im Namen entsprechen.

To Do:
- Suchpfad anpassen
- Bestimmen, wo das Suchkriterium herkommt (hier A1 im 1. Blatt der Mappe)
- Ausprogrammieren, was gemacht werden soll mit der geöffneten Datei

Viel Erfolg,
Nayus


Sub findNopenFile()
Dim sWord As String, sPath As String,
dim sSearchPath As String, FileName As String, InputData
sWord = sheets(1).cells(1,1) '
'Suche nach allen Dateien im Verzeichnis c:\temp\
sSearchPath = "c:\temp\*.*"
sPath = "c:\temp\"
FileName = Dir(sSearchPath)
If FileName <> "" Then
Do While FileName <> ""
If instr(FileName, sWord) > 0 Then
' Datei gefunden, die dem Kriterium entspricht
Open sPath & FileName For Input As #1
Do While Not EOF(1)
Line Input #1, InputData
... tu, was immer Du willst mit der geöffneten Datei
Loop
Close #1
End If
'nächste Datei
FileName = Dir
Loop
End If
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Mappe mit variablen Dateinamen aktivieren
Peter

Hallöchen an alle,
wie kann man eine geöffnete Mappe über workbooks.activate oder windows.activate ansprechen, ohne dass man den vollen Dateinamen kennt.
Dateiname = "Auftragskennzahlen(*).xls"
Das * steht für eine Zahl, die mir nicht bekannt ist, sondern von einer Web-Datenbank ver...
07.08.2008 17:27:58
Thread-ID: 1000047
4 Beiträge
Öffnen mehrer Dateien mit gleichen Namen
Ryu

Hallo!
Wenn ich irgendwelche Exceldateien öffne und anschließend noch eine andere mit dem selben Namen (Wenn ich z.B. das Original bei mir behalte und die korrigierten von Kollegen bekomme), dann ist es so, dass entweder die zweite Datei automatisch umbenannt und geöffnet wird oder es wird...
27.08.2008 18:02:00
Thread-ID: 1005168
3 Beiträge
Liste mit Arbeitsblattnamen
Christian

Hallo Forum,
ich habe in einer Exceldatei mehrer - viele Arbeitsblätter, die, da sie importiert wurden, sehr unterschiedliche Namen haben, wie z.b. Apfel, Spargel, Schrauben, Ausfall......0,123 5,38 usw.
Um Daten aus diesen Blättern zusammenführen zu können benötige ich in einem Arbei...
28.08.2008 10:35:00
Thread-ID: 1005327
8 Beiträge
Anzeige
Bilddatei mit neuem Namen speichern
egonkernien

Hallo wer hilft bitte?
Guten Abend.
Ich möchte eine Dialogbox aufrufen, dort eine Bilddatei auswählen.
Ich möchte diese Bilddatei in ein Image1 auf einer Userform laden. Z.B. D:\Daten\Bilder\DSC0011.jpg
Dann diese Bilddatei umbenennen in D:\Daten\Test\082008_01.jpg, abspeichern...
28.08.2008 22:32:28
Thread-ID: 1005608
5 Beiträge
Datei öffnen Abfrage nach Dateinamen mit Userform
lisa

Hallo zusammen.
Ich hab die gleiche Frage in einem älteren Thread von mir gerade eben gestellt.
Ich weiß aber nicht ob diesen noch jemand liest, da ich die Frage nicht auf, noch offen gestellt, habe und ihn auch nicht in Beiträge von heute finde.
Also wenn doppelt, bitte nicht böse...
04.09.2008 14:23:00
Thread-ID: 1007419
5 Beiträge
Namen mit Konstante: funktioniert nicht!?
Jens

Hallo liebes Forum,
leider mag mich Excel mal wieder nicht:
Folgende Formel funktioniert zwar:
=ANZAHL2('Mein_Blatt'!6:6)
und liefert den richtigen Wert, aber ich möchte die Formel nach unten kopieren; dabei wird der Wert 6 inkrementell erhöht, was aber nicht passieren soll.
11.09.2008 16:58:00
Thread-ID: 1009181
4 Beiträge
In Zelle mit Namen schreiben
fga

Hallo
Ich habe ein Tabellenblatt. In dem Blatt habe ich für die Spalten einen Namen definiert. Ebenso für die Zeilen. (links oben im Namensfeld)
Z.B.:
..... Sh1 Sh2 Sh3
Rh1
Rh2
Rh3
Nun möchte ich über den Namen der Zeile und Spalte die betreffende Zelle lesen,...
08.10.2008 15:27:04
Thread-ID: 1015078
12 Beiträge
Anzeige
Email Ergänzing, Adresse CC
Karel

Hallo Forum,
habe in diese Forum unterstehende Email VBA code gefunden.
AUF tabelleblatt Mailadresse stehn ab A2 sten untereinander alle Emailadresse
Wie kann ich Emailadresse als CC genau so abfragen auf Tabelleblatt mail adressen ab Zelle C2
Option Explicit
Sub Serien_E...
23.10.2008 19:45:00
Thread-ID: 1018786
7 Beiträge
Probleme mit Namen für Formel und Vba
Reinhard

Hallo Wissende,
die Datei: https://www.herber.de/bbs/user/56243.xls hat nach Klick auf den Button die nachfolgende Tabelle:
Die Berechnung in Spalte C ist korrekt, so soll es aussehen, also pro Stunde nur einen Wert, Rest 0.
Da die Originaldatei alle 65536 Zeilen ausgenutzt hat, e...
24.10.2008 13:28:00
Thread-ID: 1018986
6 Beiträge
Anzeige
Probleme mit Namen / Funktion
born2b@gmx.de

Guten Morgen,
bei angehängter Datei bekomme ich beim Speichern immer die
Meldung "Der Name Dms360 steht in Konflikt mit einer gültigen
Bereichsbezeichnung oder ist für Exel ungültig. Der Name
wurde durch _Dms360 ersetzt".
Dms360 ist eine selbstdefinierte Funktion. Ich fi...
05.11.2008 10:34:00
Thread-ID: 1021784
2 Beiträge
Probleme mit Namen / Funktion
born2b@gmx.de

Guten Morgen,
bei angehängter Datei bekomme ich beim Speichern immer die
Meldung "Der Name Dms360 steht in Konflikt mit einer gültigen
Bereichsbezeichnung oder ist für Exel ungültig. Der Name
wurde durch _Dms360 ersetzt".
Dms360 ist eine selbstdefinierte Funktion. Ich fi...
05.11.2008 11:01:00
Thread-ID: 1021795
2 Beiträge
Email Hyperlinke mit Betreff aus Dateiname&Registe
Patrick

Hallo miteinander
Ich versuche von der Excel Tabelle eine Email über einen Email Hyperlink zu starten. Diese Email soll automatisch im Betreff den Dateinamen der Exceltabelle und den Namen des aktiven Tablellenblattes/Registers enthalten.
Geht das und wie heisst der Hyperlink dazu ?
...
07.12.2008 15:18:33
Thread-ID: 1030869
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige