Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
352to356
352to356
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

anders: Datrei automatisch zu Datum X löschen

Forumthread: anders: Datrei automatisch zu Datum X löschen

anders: Datrei automatisch zu Datum X löschen
16.12.2003 23:23:15
thomas
Hallo Profis!

ich stelle hier mal die Frage von eben anders:

ich kann mich dran erinnern, dass es mal einen Beitrag gab, dass Dateien nach einem bestimmten Datum gelöscht werden.... leider kann ich diesen nicht mehr finden!

habt ihr eine Idee, wie es geht?

Danke schon mal!!!
Anzeige

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: anders: Datrei automatisch zu Datum X löschen
16.12.2003 23:32:56
xXx
Hallo,
als Ansatz

Private Sub Workbook_open()
If Date>DateValue("31.12.2004") Then
ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill ActiveWorkbook.FullName
ThisWorkbook.Close False
End If
End Sub

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S.Das Forum lebt auch von den Rückmeldungen an die Antworter.
Anzeige
HAMMER!!!!!!
16.12.2003 23:38:57
thomas
Hey, xXx!!!!

einfach super!!!!!!!!! da wird sich aber jemand wundern!!!!!! weißt du, ob es trotzdem irgendeine möglichkeit gibt die dat wieder herzustellen? wegen evtl. forderungen gegen mich......

DANKE NOCHMAL!!!!
Du bist der Held des Tages!!! :-)))
Keine Chance!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
16.12.2003 23:40:40
xXx
Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S.Das Forum lebt auch von den Rückmeldungen an die Antworter.
Anzeige
AW: Keine Chance!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
16.12.2003 23:41:38
thomas
treff ich dich öfter hier?!

;-)
AW: Keine Chance!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
16.12.2003 23:47:10
thomas
nochmal ich!!!

wenn man schon mal dabei ist.........

die "DAtei" besteht aus insgesammt knapp 10 Datieen...... kann ich in dem Projekt auch sagen, dass alle gelöscht werden?
AW: Keine Chance!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
16.12.2003 23:52:49
xXx
Hallo,
natürlich.
Wenn all im gleichen Ordner sind:
P=thisWorkbook.path &"\"
kill p &"Datei1.xls"
kill p &"Datei2.xls"
kill p &"Datei3.xls"
kill p &"Datei4.xls"
etc.
oder eben
kill "c:\ordner\dateiname"
Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S.Das Forum lebt auch von den Rückmeldungen an die Antworter.
Anzeige
AW: Keine Chance!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
16.12.2003 23:58:29
thomas
Der von eben:


Private Sub Workbook_open()
If Date>DateValue("31.12.2004") Then
ActiveWorkbook.ChangeFileAccess xlReadOnly
' hier kann man dann die anderen reinsetzen? kannst mir den genauen Code sagen?
' habs ausprobiert, klappt nicht....... (2. Datei: H:\Mappe6)
Kill ActiveWorkbook.FullName
ThisWorkbook.Close False
End If
End Sub

Anzeige
ein bisschen Eigeninitiative! Hilfe:Kill
17.12.2003 00:04:29
xXx
Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S.Das Forum lebt auch von den Rückmeldungen an die Antworter.
ich danke euch wirklich!!!! habt mir sehr geholfen
17.12.2003 00:05:53
thomas
-
Gute Nacht
17.12.2003 00:07:41
xXX
Anzeige
Keine Chance gibts nicht.... :-)
17.12.2003 00:38:02
Ramses
Hallo Udo

Mit einem Hex-Editor ist dauert das in etwa 15 Sekunden :-)

Gruss Rainer
AW: wer suchen will der findet auch !!
17.12.2003 00:00:25
xXx
Hallo Thomas,
nicht jeder kann suchen.
Google mit 'suchbegriff site:herber.de' kennt halt nicht jeder.;-))

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S.Das Forum lebt auch von den Rückmeldungen an die Antworter.
Anzeige
AW: wer suchen will der findet auch !!
17.12.2003 00:04:01
thomas
das kannt ich auch wirklich noch nicht............

und erhlrich gesagt, bin ich bei sowas immer sehr langsam und versteh das nur, wenn man mir meine fragen konkret beantwortet

:-(
bist Du dieser Thomas ?
17.12.2003 00:23:55
th.heinrich
hallo Thomas,

https://www.herber.de/forum/archiv/352to356/t352938.htm

im ARCHIV, RECHERCHE wurden fragen bereits konkret beantwortet, es ist halt etwas muehsam zu suchen.

ich finde aber, dass das lesen darin einen weiterbringt als immer nur auf KONKRETES (fertige loesungen) zu warten. da bleibt nichts dabei haengen.

nichts fuer ungut

auch thomas
Anzeige
;

Forumthreads zu verwandten Themen

Autom. Datei erzeugen und Inhalt hineinschreiben..
Helmut

Liebe Mitglieder,
ich habe folgende knifflige Situation manuell zu tätigen:
In einem Ordner befinden sich x PDF-Dokumente (z.B. abcde.pdf, dfg45.pdf, usw.). Zu jedem dieser Dokumente muss ich eine txt-Datei anlegen, die einen Pfad enthält und folgendermaßen aussieht, also z.B. abcde.txt...
05.09.2008 08:59:57
Thread-ID: 1007580
5 Beiträge
Inhalt von UF wird nicht angezeigt
UF

Hi Forum,
ich starte meine UF mit dem folgenden Code:
Sub auto_open() Application.WindowState = xlMinimized UF_BitteWarten.Show vbModeless Application.Run "RESETMASK" UF_BitteWarten.Hide UF_Maske.Show End Sub
Wie zu erkennen, wird beim Start ein Reset ausgeführt, der einige Sekun...
26.09.2008 14:29:02
Thread-ID: 1012639
16 Beiträge
Anzeige
makro umschreiben
haris

Hallo Experten,
ich haben folgendes Makro:
Sub pn_1_7_1() Dim i As Long, ar As Variant, j As Integer For i = 1 To Cells(1, 1).End(xlDown).Row If Cells(i, 1).Value Like "#-#######-#" Then ar = Split(Cells(i, 1).Value, "-") j = 1 While Mid(ar(1), j, 1) = "0" j = j + 1 Wend If j > 1 T...
22.01.2009 09:53:00
Thread-ID: 1042461
4 Beiträge
Daten fortlaufend von Formular in Range schreiben
Formular

Hi,
wie kann ich denn folgende Abfrage bzw kopieren erledigen:
Ich habe Ein Formular mit Textbox'n und Combobox'n
auf einem Bestimmte Tabellenblatt ("Daten") möchte ich nun die Folgenden Inhalte kopieren (button)
Auf dem Tabellenblatt ("Daten") habe ich ein Range B33 : F42 (also...
29.01.2009 09:26:24
Thread-ID: 1044806
3 Beiträge
untereinanderstehende Werte via VBA umformatieren
Harry

Hallo zusammen,
ich habe folgendes Problem, das ich gerne mit VBA lösen möchte:
Und zwar habe ich eine Tabelle, in der untereinander in verschiedenen Spalten Werte stehen, die ich auf einem weiteren Tabellenblatt hintereinander ausgeben möchte.
Ich benötige dazu ein Makro, das bspw....
30.03.2009 19:56:28
Thread-ID: 1065412
5 Beiträge
Anzeige
Pfad mit Dialog suchen und in Textfeld schreiben
Beni

Hallo zusammen
Ich habe in einem Userform einen Button, der einen Dialog öffnen soll, in dem der User eine Datei auswählen kann.
z.B. Application.Dialogs(xlDialogOpen).Show "R:\FA\030 FAD"
Hat er eine Datei ausgewählt, soll diese NICHT geöffnet, sondern nur der Pfad des Ablageortes...
26.06.2009 16:11:27
Thread-ID: 1084646
6 Beiträge
Eingabe soll sich selbst überschreiben
Jörg-HH

Guten Abend zusammen
hab Schwierigkeiten, mein Problem zu benennen, und weiß daher auch nicht, wonach ich erstmal im Archiv suchen könnte...
Der User soll in zwei Zellen je eine Eingabe machen. Nach Enter der zweiten Eingabe soll der dort eingegeben Wert sich selbst mit dem zuerst einge...
28.07.2009 20:51:05
Thread-ID: 1092068
5 Beiträge
Anzeige
Kombinationsfeld Überschreiben sperren
Jordan

Hallo zusammen,
ich habe in einem UserForm verschiedene Kombinationsfelder, die ich mit vorbestimmten Inhalten bestückt habe! Nun kann der Nutzer aber leider den vorbelegten Text überschreiben und beim Klick auf "OK" wird dieser dann auch übertragen.
Kann ich dieses Überschreiben des Ko...
29.07.2009 15:34:27
Thread-ID: 1092303
3 Beiträge
In Zelle schreiben und Formel erhalten
sanktflorian

Hallo,
ich habe eine Startliste erstellt wo die Starter von einem anderen Blatt eingefügt werden.
Da die Mannschaften vielleicht mit einem Mann weniger antreten müßte ich die Startliste ändern, da diese Zellen dann nicht schreibgeschützt sind möchte ich gerne aber die Formel schützen.
18.08.2009 10:32:05
Thread-ID: 1096658
3 Beiträge
Makroname in Zelle automatisch schreiben
Nibio

Hallo Excel-Profis,
Gibt es ein Befehl dass der Makroname in eine bestimmte Zelle schreibt (z.B in Zelle X1)?
Da mein deutsch leider nicht so gut ist (da ich keine deutsche Schule besucht habe), versuche ich mit ein Beispiel mi besser auszudrucken:
Sub Test() ' Makro2 Makro ' Makro...
18.08.2009 13:01:45
Thread-ID: 1096729
15 Beiträge
Makro Code umschreiben
Sprekelmeyer

Hallo Excelfreunde,
habe diesen Code:
If Workbooks("offene Rechnungen.xls").Worksheets("Kunde 04").Range("I8") = _
Workbooks("Rechnungsvorlage.xls").Worksheets("Artikel").Range("I8") Then
statt Worksheets("Kunde 04") möchte ich das aktuelle Worksheets das gerade angezeigt wird w...
26.08.2009 22:26:48
Thread-ID: 1098899
9 Beiträge
Daten ohne Dopplung in eine Spalte schreiben
Lars

Hallo liebes Forum,
ich habe folgendes Problem und hoffe Ihr könnt mir einen Tipp geben:
Ich habe eine Liste von Betreuten. In der jeweiligen Zeile stehen die Stammdaten der Person, aber auch der des Sachbearbeiters beim Amt. Letztere sind in der gesamten Tabelle teilweise einmal aber a...
31.08.2009 19:03:32
Thread-ID: 1099685
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige