Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1104to1108
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Excel automatisch öffnen

Excel automatisch öffnen
renz
Guten Tag,
ich möchte eine einfache Excelliste automatisch täglich einmal öffnen und wieder schließen.
Dabei werden die Daten aktualisiert, bzw. Excel holt sich die Daten aus der DB neu.
Kann mir jemand einen Tipp geben wie ich das in den Taskmanager oder in Excel eintragen kann.
Vielen Dank!
Thomas

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Excel automatisch öffnen
24.09.2009 12:51:08
Tino
Hallo,
lege dir im Taskplaner diesen Vorgang an,
in der Tabelle machst Du ein Makro dass die Datei wieder automatisch geschlossen wird.
In etwa so.
kommt als Code in DieseArbeitsmappe
Option Explicit 
 
Private Sub Workbook_Open() 
 
Application.Calculate 
ThisWorkbook.Save 
Application.OnTime Now + TimeSerial(0, 0, 5), "Close_" 
 
End Sub 
 
 
kommt als Code in ein Modul
Option Explicit 
 
Sub Close_() 
If Not Tabelle1.CheckBox1 Then 
    If Workbooks.Count = 1 Then 
     Application.Quit 
    Else 
     ThisWorkbook.Close False 
    End If 
End If 
End Sub 

Eventuell würde ich mir noch eine digitale Signierung für die Datei erstellen,
damit eventuell auch sichergestellt wird das Makros erlaubt sind.
Zum Thema digitale Signierung findest Du bestimmt was über Google oder hier im Archiv.
Um die Datei bearbeiten zu können, würde ich mir einen CheckBox oder so in die Datei
einbauen wo Du dass schließen abschalten kannst.
Dann würde ich das schließen über Application.OnTime um ein bar Sekunden verschieben
um die Zeit zu haben die CheckBox zu aktivieren.
Auch über Application.OnTime findest du einiges hier im Archiv.
Gruß Tino
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige