Can't test, but try this:
$excel = New-Object -ComObject Excel.Application
$excel.Visible = $true
$workBook = $excel.Workbooks.Open("C:\Scripts\intachlist.xls")
$workSheet = $workBook.Worksheets.Item(1)
$i = 1
do
{
$computerName = $workSheet.Cells.Item($i, 1).Value()
if ($computerName -ne $null)
{
Get-WMIObject Win32_BIOS -ComputerName $computerName
$session = New-PSSession -Computername $computerName
Invoke-Command -Session $session -ScriptBlock { Invoke-Expression "winmgmt /resyncperf; wmiadap -f; restart-service winmgmt -Force" }
}
$i++
} while ($d -ne $null)