nicht angemeldet
Hallo,
ein Array brauchst Du dafür doch gar nicht. Schneide doch einfach mit Left() und Len() die letzten vier Zeichen ab. Also, wenn Du den Dateinamen an die Variable strDName übergeben hättest, z. B.
strDName = Left(strDName, Len(strDName)-4)
Schau Dir in der VB / VBA-Hilfe mal die Zeichenkettenfunktionen an.
Gruß
Susanne