Da ich nun wieder arbeiten kann, hätte ich leider auch gleich ein Problem.
Ich habe dieses mir erstellt:
Sub Dateien_loeschen()
If Range("G7") = "" Then
kill "C:\Temp\Mp000.txt"
kill "C:\Temp\Mp000.ps"
End If
If Range("G8") = "" Then
kill "C:\Temp\Mp001.txt"
kill "C:\Temp\Mp001.ps"
End If
If Range("G9") = "" Then
kill "C:\Temp\Mp002.txt"
kill "C:\Temp\Mp002.ps"
End If
If Range("G86") = "" Then
kill "C:\Temp\Mp079.txt"
kill "C:\Temp\Mp079.ps"
End If
End Sub
Da dieses bis zur Zeile 86 geht und die Dateien bis 079 geht würde ich dieses gerne kürzer fassen wollen, aber leider weiß ich nicht wie. Könnte mir dabei jemand helfen?
Gruß Rene