Thread: Need help
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Patrick Molloy[_4_] Patrick Molloy[_4_] is offline
external usenet poster
 
Posts: 103
Default Need help

If the list you copy from is in excel then it should be easy to copy or
addit to you workbook...

lets say you working book needs the data in sheet1

first you need to open your "list" workbook - and I'll assume it has just
the one sheet. also for simplicity I'll assume the table starts in A1

you code might look like this:


Sub fetchList()
DIM fn as string
dim wb as workbook
fn =applicatio.getopenfilename()
set wb = workbooks.open(fn)
wb.activesheet.Range("A1").CurrentRegion.copy
ThisWorkbook.worksheets("sheet1").Range("A1").past especial xlAll
Application.CutCopyMode=false
wb.close false
End Sub


This allows you to open a workbook and copy the sheet data ...hope it helps

--
Patrick Molloy
Microsoft Excel MVP
---------------------------------
I Feel Great!
---------------------------------
"Nick" wrote in message
...
Well i do understand the more detail part, but with it being insuranece
thats classified information, or else i would be more then willing to put
the lists out there for you to see, know what i'm saying... but thanks for
your help, Both the list i copy from and the list i need to put the
information in are Excel, But let me see what I can do...

Thanks for you help!!! :)
Nick