this should help you on your way:
 Code:
$adOpenStatic = 3
$adLockOptimistic = 3
$adCmdText = &0001

$objConnection = CreateObject("ADODB.Connection")
$objRecordSet = CreateObject("ADODB.Recordset")

$objConnection.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Scripts\Test.xls;Extended Properties='Excel 8.0';HDR=Yes;;")

$objRecordset.Open("Select * FROM [Sheet1$]", $objConnection, $adOpenStatic, $adLockOptimistic, $adCmdText)

While NOT $objRecordset.EOF
  ? $objRecordset.Fields.Item("Name"), $objRecordset.Fields.Item("Number")
  $objRecordset.MoveNext
Loop