в vba и vbscript я новичок.

Set obj_excel = CreateObject("Excel.Application")
Set obj_WorkBook = obj_Excel.Workbooks.Open(temp_file)

obj_Excel.Visible = 0
obj_WorkBook.Sheets(1).Cells(1,1).ColumnWidth = 55.57
obj_WorkBook.Sheets(1).Cells(1,2).ColumnWidth = 8.29
obj_WorkBook.Sheets(1).Cells(1,3).ColumnWidth = 72.43
obj_WorkBook.Sheets(1).Cells(1,4).ColumnWidth = 11.57
obj_WorkBook.Sheets(1).Cells(1,5).ColumnWidth = 10.57
set used_range = obj_WorkBook.Sheets(1).UsedRange

used_range.Font.Name = "Arial"
used_range.Font.Size = 8
used_range.Borders.Linestyle = 2
used_range.borders.weight = 1

set used_rows = used_range.Rows.Count
set used_columns = used_range.columns.count

последние строки выдают ошибку
"Требуется объект used_range.rows.count"
Нужно найти номер последней непустой строки файла

Ex_Soft спасибо дельный совет !