Startseite starten

Question

Hallo.

Ich habe mir eine Aufgabe gestellt, bekomme sie aber nicht gelöst. Habe ein Tabellendokument. Dort möchte ich zB im Dokument 2 oder 3 etwas ändern und dann möchte ich es über dem x oben einfach schließen. Es soll dann automatisch, ohne Fragen speichern. Und nun kommt das beste, beim Neustart des Dokuments soll immer die Startseite ( Dokument 1 ) öffnen.

Hat jemand eine Idee, oder kann er mir kurz helfen?

Habe ein Beispiel Dok aufgesetzt: http://www.file-upload.net/download-3243259/Mappe1.xls.html[/url]

Danke im vorraus.

Answer 1

Moin,

Aus dem Stand wuerde das bei mir aussehen wie folgt:

Private Sub Workbook_BeforeClose(Cancel As Boolean) 'wird "vor dem" Schliessend er Mappe ausgeloest
Application.ScreenUpdating = False 'Bildschirm aus
With ThisWorkbook 'mit dieser Arbeitsmappe
.Worksheets(1).Activate 'Worksheet"1" aktivieren
.Save 'Mappe speichern
End With 'Ende "mit dieser Mappe"
Application.ScreenUpdating = True 'Bildschirm an
End Sub

Cu TheBlackBird ®

Answer 2

Moin,

Fuer den Fall der Faelle: Obiger Codeschnippsel gehoert ins CodeModul "Diese Arbeitsmappe".

Cu TheBlackBird ®

Answer 3

Hallo.

Auch wenn ich mich erst so spät melde ( hatte aus fam. Gründen keine Zeit mehr ) sage ich noch herzlichen Dank.
Habe aber noch eine Frage: Wenn ich das im VB einfüge, kann ich das auch sichern über ein Passwort? Wenn ja, wie legt man das an und wie versteckt man das?

Danke nochmals

Answer 4

Moin,

Im VB-Editor:
[*] Rechtsklick auf das Project der zu schuetzenden Mappe
[*] "Eigenschaften von VBA-Project" waehlen
[*] Register "Schutz" anwaehlen
[*] Haken bei "... fuer Anzeige sperren" setzen
[*] Passwort 2mal eintragen
[*] OK
[*] Mappe speichern

Cu
TheBlackBird ®

Answer 5

Hallo.

Vielen Dank, es hat super geklappt.

VG