I think you have to loop through each cell in the worksheet.

Dim Rng As Range
Application.ScreenUpdating = False
For Each Rng In ActiveSheet.UsedRange.Cells
Sheet1.Spreadsheet1.Range(Rng.Address).Value = Rng.Value
Next Rng
Application.ScreenUpdating = True



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Rishi Dhupar" wrote in message
oups.com...
Hi,

My goal of my VB form is to be able to select certain things
and then
display a filter spreadsheet using the Excel component in
Microsoft
Office Spreadsheet 10.0 control.

Can someone tell me how to load an entire excel sheet into my
component
sheet? After that I should be able to figure out how to filter
and
display only certain rows/columns.

Thanks,
RishiD