View Single Post
  #6   Report Post  
Marcus Langell
 
Posts: n/a
Default

Open all workbooks and use this to reference cell Sheet1!$C$1 in all
workbooks in column A of the active sheet:

Sub RefWBs()
c = 0
For Each wb In Application.Workbooks
c = c + 1
ref = "=[" & wb.Name & "]Sheet1!$C$1"
Range("A" & c) = ref
Range("B" & c) = wb.Name 'to know which wb it came from
Next
End Sub

/Marcus


"Marguerite" wrote:

This doesn't eliminate the problem of needing to access/type in all those
different workbook files... :(

"Eric" wrote:

Marguerite,

You could use INDIRECT, but you'd still need to type in the file names that
you wanted.

Eric


"Marguerite" wrote:

I have a large number of workbooks with identical structures. I want to get
information from a location on a particular sheet in every one of these
workbooks, and list it in a new workbook. Any ideas of how to do this
without having to copy-and-paste from each of the locations or manually enter
the source for each of these books?

Thanks!