Setting a default for the FilePicker dialog box

Posted on 2004-12-01
Last Modified: 2012-05-05
I've been using the newly-available FilePicker Dialog to allow a user to navigate to a file or folder on the file system.  It's a wonderful feature.

Does anyone know how i could use VB code to set a starting point for the dialog box?  The current default is at the lowest level of the user's file system.  I'd like to save them a few mouse clicks by getting them part way up the tree.

thanks in advance,

Question by:med39
    LVL 119

    Accepted Solution


        With Application.FileDialog(msoFileDialogFilePicker)
            .InitialFileName = CurrentProject.path             'this will open the Directory where your db is

        End With
    LVL 2

    Author Comment


    Thanks for the prompt reply!  I adapted your suggestion, and learned from it.


    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    IT, Stop Being Called Into Every Meeting

    Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

    In the article entitled Working with Objects – Part 1 (, you learned the basics of working with objects, properties, methods, and events. In Work…
    A simple tool to export all objects of two Access files as text and compare it with Meld, a free diff tool.
    Using Microsoft Access, learn some simple rules for how to construct tables in a relational database. Split up all multi-value fields into single values: Split up fields that belong to other things into separate tables: Make sure that all record…
    What’s inside an Access Desktop Database. Will look at the basic interface, Navigation Pane (Database Container), Tables, Queries, Forms, Report, Macro’s, and VBA code.

    761 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    10 Experts available now in Live!

    Get 1:1 Help Now