Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
132to136
132to136
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeitlimit

Forumthread: Zeitlimit

Zeitlimit
27.06.2002 21:43:58
Heinzman
Hallo
Ich möchte auf eine Datei ein Zeitlimit setzen und diese Datei danach schliessen.
Sub OnTime(EarliestTime, Procedure As String, [LatestTime], [Schedule])
Element von Excel.Application
Dieser Sub schliesst mir aber das gesammte Excel, es soll aber nur eine Datei geschlossen werden.
Wer kann mir helfen??

Danke schonmal Heinzman

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zeitlimit
27.06.2002 21:49:27
Hajo_Zi
Hallo Heinzman

folgenden Code in DieseArbeitsmappe
Private Sub Workbook_Open()
startzeit
End Sub

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
startzeit
End Sub


und in ein Modul
Füge nun ein normales Modul ein, in das dieser Code muß:
Dim datA As Date
Sub startzeit()
On Error Resume Next
Application.OnTime EarliestTime:=datA, Procedure:="Schließen", Schedule:=False
datA = Now + CDate("0:01:00")
Application.OnTime datA, "Schließen"
End Sub

Sub Schließen()
ActiveWorkbook.Close True
End Sub


Gruß Hajo

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige