Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
using BrowseForFolder shell application
Hello !
I try to use this code : Sub ChoixRepertoire() Dim objShell As Object, objFolder As Object, oFolderItem As Object Dim Chemin As String Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.BrowseForFolder(&H0&, "Choisir un répertoire", &H1&) On Error Resume Next Set oFolderItem = objFolder.Items.Item Chemin = oFolderItem.Path MsgBox Chemin End Sub I have Excel 2002, and Windows XP. I'd like to block the user from dragging folders in that window. Is it possible ? I don't want the user to move folders while seleting it. I've tried with the API, but I cannot set the root folder, so the user doesn't go anywhere else in the tree thanks ! tiah. |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
BrowseForFolder | Excel Programming | |||
Return to Excel after shell an application | Excel Programming | |||
SHELL to open an application and pass parameters to it | Excel Programming | |||
Shell can open an application, can it close an app too? | Excel Programming | |||
Application Process-Shell Command | Excel Programming |