$SearchTerm = "Question Sequence"
    $Range = $ws.UsedRange()
    $Match = $Range.Find($SearchTerm)
    $First = $Match
    Write-Host "        Reports at: " -NoNewline
    Do
    {
        $MatchCell = $Match.AddressLocal($false, $false)
        Write-Host "$MatchCell " -NoNewline
        $Match = $Range.FindNext($Match)
    } while ($Match -ne $NULL -and $Match.AddressLocal() -ne $First.AddressLocal())