Copy the name of a workbook as it appears in it's folder to a cell

[[email protected]]

This is a small piece of code I am hoping to insert into the larger piece of code I already have. My code goes through a folder and takes a column out of each excel workbook (100+) and copies it into a summary work book. No where in each of the 100+ workbooks does a good name appear so that I know which column is from which workbook in the Summary workbook, so I am hoping to copy the actual name of each workbook and put it above the copied column in the summary workbook. For example the first workbooks name should be copied into cell C:5.

[walruseggman]

I think you're just asking about .Name? I don't know how you're iterating through your workbooks, but if I have a workbook named Book1 open, then this code would set x equal to "Book1". make sense?

Please Login or Register  to view this content.

[mikeTRON]

I am not exactly sure what you are asking for but something like the follow should work.

Please Login or Register  to view this content.