folgender Code fuzt bei mir nur unter Excel 2000, ich brauch Ihn aber unter 97, habe schonmal unten gepostet, aber Beitrag ist fast weg, bitte nochmalHilfe:
Sub DateiEinlesen()
'On Error GoTo ERRORHANDLER
Dim iCounter As Integer
With Application.FileSearch
.LookIn = Cells(ActiveCell.Row - 1, ActiveCell.Column).Value
.Filename = "*." & Cells(ActiveCell.Row - 1, ActiveCell.Column + 1).Value
.Execute
For iCounter = 1 To .FoundFiles.Count
Cells(iCounter + 7, ActiveCell.Column).Value = Dir(.FoundFiles(iCounter))
Next iCounter
End With
'ERRORHANDLER:
End Sub
folgender Fehler bei Zeile:
.Filename = "*." & Cells(ActiveCell.Row - 1, ActiveCell.Column + 1).Value
Unzuläßiger Prozeduraufruf oder ungültiges Argment
Das ganze fuzt unter 2000 super, aber ich brauch es halt unter 97, bitte helft mir
Danke
Steffen