ps.com [mailto:excel-macros@googlegroups.com]
> On Behalf Of pavan Kumar
> Sent: Apr/Mon/2012 09:04
> To: excel-macros@googlegroups.com
> Subject: Re: $$Excel-Macros$$ Folder Structure - VBA Code
>
> HI Rajan,
>
> Please find the attached file.I have run the macro and unable to get the
cel-macros@googlegroups.com
> Subject: Re: $$Excel-Macros$$ Folder Structure - VBA Code
>
> HI Rajan,
>
> Awesome its working fine as per my requirement, need a small
> correction, the subfolder's is not working for more than one folder,
> sorry I am not so good @ VBA h
For Each objFl In objFldLoop.Files
>> Range("A1").Offset(lngCounter, 1).Value = objFl.Name
>> lngCounter = lngCounter + 1
>> Next
>> LoopThroughEachFolder objFldLoop
>> Next
>> End
-Macros$$ Folder Structure - VBA Code
HI Rajan,
Awesome its working fine as per my requirement, need a small correction, the
subfolder's is not working for more than one folder, sorry I am not so good
@ VBA hence I can get it on my own so I am troubling you. I require to have
the last continent of
ldLoop.Path
> For Each objFl In objFldLoop.Files
> Range("A1").Offset(lngCounter, 1).Value = objFl.Name
> lngCounter = lngCounter + 1
> Next
> LoopThroughEachFolder objFldLoop
> Next
> End Function
>
> -Original Mess
-macros@googlegroups.com]
On Behalf Of pavan Kumar
Sent: Apr/Mon/2012 08:20
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Folder Structure - VBA Code
HI Rajan,
Thanks for the replay, its working fine, i need little more help on the
same, i like to have the folder contains in the next
HI Rajan,
Thanks for the replay, its working fine, i need little more help on
the same, i like to have the folder contains in the next colm(forgot
to mention in my earlier mails).
Thanks and Regards,
Pavan Kumar G
On 4/16/12, Rajan_Verma wrote:
> Hi Pavan,
>
> Please try this , give your folder
Hi Pavan,
Please try this , give your folder path instead of "C:\PenDrive\", it will
give you folder structure.. I am unable to get the files in UNZIP folder ,I
will come back to you on this.
'===