カタログ ウィンドウのホーム フォルダーを設定

Sub SetHomeFolder()
    Dim pGxCatalogWorkspace As IGxCatalogWorkspace
    Set pGxCatalogWorkspace = Application
    
    pGxCatalogWorkspace.UseWorkspaceFolder = True
    
    pGxCatalogWorkspace.OpenWorkspaceFolder "D:\Workspace\Support\130417-000015"
    'カタログ ウィンドウの再描画も実行される
    
    Debug.Print pGxCatalogWorkspace.WorkspaceFolderPath

End Sub


' http://www.arcgis.com/home/item.html?id=bc4cb9ab2f6e4f49a5f1bede7be4d463

If you want to modify the registry directly, below are the steps:

    In Windows, click Start > Run.
    In the Run window, type 'regedit'. In the Registry Editor window, navigate to HKEY_CURRENT_USER > Software > ESRI > Desktop 10 > ArcCatalog.
    Select Edit > New > Key and name it 'DefaultHomeFolder'.
    Right-click the new key DefaultHomeFolder, select New > String Value, and name it 'Location'.
    Double-Click the new string value 'Location' and change its value to the path of the desired home folder.