Hallo liebe Experten,
da dies nur Experten hinbekommen können, wende ich mich gleich mal hoffentlich an die richtigen.
Kurze Erklärung.
Ich habe eine Excel-Datei die immer auf demselben Laufwerk ist.
Nach Bearbeitung möchte ich gerne diese Excel-Datei auf einem anderen Laufwerk speichern.
So nun zu meinem Problem.
Um den Zielordner zu erreichen muss ich zuerst 10 andere Ordner öffnen bis ich am richtigen bin.
Ist es möglich mit einem Button „Speichern unter“ auszuwählen und dann sofort den Zielordner zu öffnen?
Denn wenn man nur „Speichern unter“ öffnet, so wird der Ordner geöffnet indem die Vorlage liegt.
Excel 2010 - Bsppfad: O:\Test\Land A\Ebene 23\Gebiet 2.…
Vielen Dank für eure Hilfe
Gruß
jlnpipapo
Hallo jlnpipapo,
ich bin zwar bestnfalls ein Hobby-Experte, aber ich versuchs mal:
Kennst du dich ein bisschen mit dem VBA editor aus?
Trage in den Codebereich von „Diese Arbeitsmappe“ folgenden Code ein:
Private Sub Workbook\_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If SaveAsUI Then
Cancel = True
With Application.FileDialog(msoFileDialogSaveAs)
.InitialFileName = "hier Pfad eintragen" & ActiveWorkbook.Name
If .Show Then ActiveWorkbook.SaveAs .SelectedItems(1)
End With
End If
End Sub
Dort wo ich geschrieben habe „hier Pfad eintragen“, musst du statt dessen deinen gewünschten Pfad (mit abschließendem ) zwischen die Anführungszeichen eintragen.
Immer wenn du dann „Speichern Unter“ wählst, sollte er diesen Pfad voreinstellen.
Gruß, Andreas
Hallo nichts sagender Name,
Excel 2010 - Bsppfad: O:\Test\Land A\Ebene 23\Gebiet 2.…
Vielen Dank für eure Hilfe
dann stell doch einfach den Speicherort unter Optionen>Speichern um.
Gruß-Wolfgang