Jump to content

Saufi666

Abgemeldet
  • Gesamte Inhalte

    10
  • Registriert seit

  • Letzter Besuch

Reputation in der Community

0 Neutral

Über Saufi666

  • Rang
    Newbie
  1. Hallo Cybquest, naja Die Sheets haben ca. 12 Buchstaben als Beschriftung. Ich habe auch kein Problem die von Hand zu setzten die links, aber ich dachte vielleicht könnte man das auch mit der Erstellung der Seiten machen. Grüße Saufi666
  2. Hallo liebe Kollegen, ich habe eine Tabelle A6-Axxxx aus diesen lasse ich per VBA Tabellenblätter erzeugen. Sub x() Dim Zelle, Bereich As Range Dim i As Integer Dim nWS As Worksheet Dim Bool As Boolean Set Bereich = Range("A6:A" & Range("A65536").End(xlUp).Row) For Each Zelle In Bereich For i = 2 To Worksheets.Count If Worksheets(i).Name = Zelle.Value Then Bool = True Exit For Else Bool = False End If Next i If Bool = False Then Set nWS = Worksheets.Add(after:=Worksheets(Worksheets.Count)) nWS.Name = Zelle.Value End If Next Zelle End Sub meine Ahnung von VBA beschränkt sich auf ich Google mein Problem und hoffe das es was fertiges gibt. Ich würde gerne nun Alle Zeilen A6-Axxx auch gleich mit einem Link versehen der auf die Seite springt. optional wäre natürlich dann in Zelle A1 ein Button/Link für Zurück. Der Code oben hat auch den Fehler das er sollte er nichts anlegen können eine Blatt eröffnet mit einer Zahl. (stört mich aber eigentlich relativ wenig) Das mache ich bissher von Hand Wenn mir jemand helfen könnte wäre super. Danke für eure Hilfe Saufi666 Ic
  3. Ich würde so vorgehen: Alle Dateien älter als 7 Tage löschen Datum der letzten PDF speichern. Würde ich ungefähr, um Dir auf die Sprünge zu helfen, so lösen: $dateLastWriteTime = $objFileList[$objFileList.Count -1].LastWriteTime Alle Dateien älter als das Datum der letzten PDF löschen Ah jetzt versteh ich was du meinst ;) Danke eventuell bekomm ichs nun hin. Wenn nicht werd ich mich wieder melden . Vielen Dank für die Hilfe
  4. Servus, das ich nicht weis wie ich Dateien dessen alter ich nicht bestimmen kann bis zur nächsten "jungen" PDF löschen kann. Würde ich sonst hier schreiben?
  5. Servus, die log Dateien können auch neuer sein, sind aber immer älter als die Zusammenfassung dieser .txt Dateien. 1.6 Log1.pdf 2.6 log1.txt 3.6 log2.txt 4.6 log3.txt Diese hier müssten demnach gelöscht werden 5.6 log2.pdf 6.6 log4.txt 7.6 log5.txt 8.6 log3.pdf 9.6 log6.txt 10.6 log7.txt 11.6 log8.txt 12.6 log9.txt 13.6 log10.txt 14.6 log4.pdf
  6. Servus, Es gibt kein Spezielles Szenario hierfür es wäre nur etwas was mich persönlich interessiert, es Resultiert aus einer Aufgabe in der Berufsschule Dateien zu löschen die älter als x Tage sind. In dem Testprogramm legt das Programm .txt Dateien an die in PDF Dateien zusammengefasst werden. Alles PDF älter als 7 Tage sollen gelöscht werden. Was ich unschön fand ist die Tatsache der .txt Dateien die weiter gesammelt werden. Darauf beruht meine Idee die Dateien die Zusammengefasst worden sind inklusive des 7 Tage alten Logs zu löschen, woran ich allerdings scheitere aus purer Unwissenheit. Hoffe das Wochenende war erholsam.
  7. Servus Jan, und welchen Tipp hättest du mir wenn wie oben erwähnt die .txt dateien zwischen den 2 PDFs aber neuer sind als die älteteste PDF und genau das ist der Punkt an dem ich scheitere...:/ Die Abfrage was ist die älteste PDF->was die darauffolgende->lösche alles dazwischen + die älteste PDF. Viele Grüße und großes danke für deine Mühe mir das zu erklären
  8. Servus Jan, die nächste PDF die keine 7 Tage alt ist. Und genau bei dem liegt mein Problem.
  9. Servus, ja hab den Befehl aus dem Kopf getippt :) Das Problem ist aber das ich ja das alter der PDF prüfen und löschen möchte und alle Dateien auch wenn sie neuer sind bis zur nächsten "Validen" PDF ebenfalls löschen möchte. Hast du dafür eine Idee
  10. Servus, sorry für die Schlechte Überschrift ich hoffe ihr könnte mit helfen. Folgendes Szenario: Wir haben die 14.6 und haben in einem Ordner folgende Dateien 1.6 Log1.pdf 2.6 log1.txt 3.6 log2.txt 4.6 log3.txt 5.6 log2.pdf 6.6 log4.txt 7.6 log5.txt 8.6 log3.pdf 9.6 log6.txt 10.6 log7.txt 11.6 log8.txt 12.6 log9.txt 13.6 log10.txt 14.6 log4.pdf Ich möchte nun die PDF die älter als 7 Tage ist löschen und alle .txt Dateien bis zur nächsten PDF die noch "neu" genug ist. Wie ich ein alter auslese und danach lösche ist mir bekannt: Get-ChildItem -Path c:\test\test12\ | Where-Object {$_.LastWriteTime -lt (get-date).adddays(-7)} | Remove-Item allerdings hört es da bei mir leider auf. Der Name vor der Datei ist Variable nur die Endung fix. Hat mir jemand da eine schnelle Lösung? Schöne Grüße und vielen Dank Daniel Klein
×