Dear Anil and Ashish
Thanks problem solved
Regards
Shrinivas
On Tue, Aug 20, 2013 at 9:32 AM, ashish koul wrote:
> try this
>
> Sub choose_file()
>
> Dim flname As String
> Dim fd As FileDialog, fl As Variant
> Set fd = Application.FileDialog(msoFileDialogFilePicker)
> With fd
try this
Sub choose_file()
Dim flname As String
Dim fd As FileDialog, fl As Variant
Set fd = Application.FileDialog(msoFileDialogFilePicker)
With fd
.AllowMultiSelect = True
.Title = "Please choose the file"
.Filters.Add "Excel Files", "*.xls*", 1
.
Dear Shrinivas,
Pl see that u have filter the ext with the following one.
.Filters.Add "Excel", "*.xls; *.xlsx; *.xlsm; *.xlsb", 1
Warm Regards,
Gawli Anil
Thanks & Regards,
Gawli Anil Narayan
Software Developer,
Abacus Software Services Pvt Ltd
On Mon, Aug 19, 2013 at 2:24 PM, Shrinivas
Dear All
I am facing a small problem I like to have help for expert.
I am trying to write a macro which will browse the folder and open the
selected file one by one.
But whenever I am opening a folder from macro I could not see any file in
that folder.
If I am opening the same folder directly there
