Hi All,
I am working on macro where in, i need to browse for a folder by clicking on browse button.
here is the code that i am using for it
Now when the file dialog opens to select a folder, if i click on Cancel button, the code crashes at "sItem = .SelectedItems(1)" how to fix this issue?![]()
Sub Browse() Dim fldr As FileDialog Dim sItem As String Set fldr = Application.FileDialog(msoFileDialogFolderPicker) With fldr .Title = "Select a Folder" .AllowMultiSelect = False .Show sItem = .SelectedItems(1) End With Set fldr = Nothing End Sub
Please help.
Thank you.
Bookmarks