Excel Save/Save As dialog

[Formula11]

Is there a setting that when you Save or Save As, the left part of the dialog default scroll is at the top, see image (1).
Normally it defaults somewhere lower and you have to keep scrolling up, see image (2).

(1)

(2)

 

[OaklandJim]

Consider using form control button for save and for save as. Combine with Excel's folder picker dialog. You can default that dialog to a target folder. That way user sees the normal Excel dialog for selecting a file. Code below shows an example.

Option Explicit

Sub TestGetFolder()

    Dim sPath As String
    
'   Use path for this workbook
'    sPath = ThisWorkbook.Path
    
'   Use descktop on Jim's computer.
    sPath = "C:\Users\Jim\Desktop"
    
    sPath = GetFolderFromUser(sPath)
    
    Debug.Print "sPath = " & sPath

End Sub

Function GetFolderFromUser(Optional psStartPath As String = "") As String
    
    Dim fldr As FileDialog
    
    Dim sItem As String
    
    Dim sPath As String
    
    If psStartPath = "" _
     Then
        sPath = Application.DefaultFilePath
    Else
        sPath = psStartPath
    End If
    
    Set fldr = Application.FileDialog(msoFileDialogFolderPicker)
    
    With fldr
        .Title = "Select a Folder"
        .AllowMultiSelect = False
        .InitialFileName = sPath
        If .Show <> -1 Then GoTo NextCode
        sItem = .SelectedItems(1)
    End With

NextCode:
    
    GetFolderFromUser = sItem
    
    Set fldr = Nothing

End Function

 

[Formula11]

Thanks for responding.

I have tried this and it works, but the difficulty is that I would like it to point to the "Quick access" which is right at the top.
But could not find the folder path for this.
If I point to Desktop, if takes the dialogue to "C" drive as shown in original post.

In Excel Options, under Save, there is an option for "Default local file location", which is equivalent to the "sPath" in the code.
But again, how to point to Quick access?

 

[Tetra201]

Try the following:
- In a folder (say, C:\Temp), create a new folder and name it Quick access.{679f85cb-0220-4080-b29b-5540cc05aab6}
- In Excel Options, under "Save," under Default local file location," enter C:\Temp\Quick access.{679f85cb-0220-4080-b29b-5540cc05aab6} and click OK.

 

[Formula11]

Thanks. I did try this but pointed to C drive again.

Tried with and without the {} characters. Tried closing and opening Excel again.