folgendes Problem:
Ich möchte *.dbf-Dateien in *.xls-Dateien speichern.
Im Moment lese ich den Dateinamen aus, füge .xls an und speicher es wieder ab. Die Datei lautet dann allerdings *.dbf.xls
Wie bekomme ich nun das .dbf da raus?
Danke
Gruß
Nico
Sub test()
Dim dateialt As String
Dim dateineu As String
dateialt = "test.dbf"
dateineu = Left(dateialt, Len(dateialt) - 4) & ".xls"
MsgBox dateineu
End Sub