Is it possible to import namerange(values) from other pages [Closed]

Report
Posts
27
Registration date
Tuesday November 18, 2014
Status
Member
Last seen
May 21, 2015
-
Hello,

i have 10 number of pages which has name like file1.. file2.. file3 to file 10
i have defined name range in all files..
i have another workbook where i want to import a name range (values with format as it looks in that file) which i defined in page1 cell a1:a10 & i need output in page2 exactly like bellow code, but i need these name range from cell a1 is from file1, a2 from file2, a3 from file3.....to... a10 from file10... till the value is there in range a1:a10. please help me regarding this..

https://ccm.net/forum/affich-810257-how-to-use-name-range-please-help-to-solve-this-issue#p812125

Sub RunMe()
Workbook(file1, file2, file3, file4..file10)
Sheets("Page1").Select

For Each cell In Range("A1:A10")
Application.Goto Reference:=cell.Value

Workbook(Currnet file)
If Sheets("Page2").Range("A1") = vbNullString Then
Selection.Copy Sheets("Page2").Range("A1")
Else
Selection.Copy Sheets("Page2").Cells(1, Columns.Count).End(xlToLeft).Offset(0, 1)
End If
Next cell

End Sub

Subscribe To Our Newsletter!

The Best of CCM in Your Inbox

Subscribe To Our Newsletter!