Speichern nach öffnen sonst schließen
09.03.2004 12:40:02
TinoB
habe wieder folgendes problem. über die nachfolgende anweisung
Private Sub Workbook_Open()
Worksheets("Vorlage").Select
Application.SendKeys Range("Y2").Value
If Application.Dialogs(xlDialogSaveAs).Show = False Then Exit Sub
End Sub
erscheint das dialogfeld "Speichern Unter" nach öffnen der datei mit dem Namen aus der ZeleY2. soweit ist alles ok, nun soll aber die datei wieder geschlossen werden, wenn man auf abbrechen klickt. so wie es jetzt ist wird ja nur das dialogfeld geschlossen. wie muß man dies umsetzten? und noch etwas, wie kann man es verhindern, dass in die Arbeitsmappe "Vorlage" gesprungen wird? es soll immer nur das erste bzw. in diesem fall das register "Ausgabe" zu sehen sein!
Danke im Voraus
Tino
Anzeige