Hallo,
ich habe mir in Excel eine kleine Funktion geschrieben, die den Dateinamen nach best. Suchbegriffen angibt.
Ich habe z.B. in A1 „123456“, in B1 „1“ und in C1 „=GetDatei(„D:\Bilder“;A1;“.tif") stehen und die Funktion liefert „123456.tif“ wenn die Datei vorhanden ist.
Durch F9 oder Shift+F9 wird diese aber nicht aktualisiert.
Wie kann ich das machen?
Option Explicit
Public Function GetDatei(Pfad As String, ArtNr As String, Pattern As String) As String
Dim Wert As String
Wert = Dir(Pfad & ArtNr & Pattern)
GetDatei = Wert
End Function