Kurze Frage:
19.03.2006 16:05:29
Pascual
Rows(ActiveCell.Row).Replace what:="?.xls", _
replacement:=Cells(ActiveCell.Row, 3) & ".xls"
End Sub
Vielen Dank im Voraus!