UFT/VBSCRIPTを使用してExcelの列の合計行数をカウントする方法

Question

Set ExcelObj = createobject("excel.application") 
ExcelObj.Visible = true 
Set ExcelConfigFile = ExcelObj.Workbooks.Open (Path) 
Set Sheet = ExcelConfigFile.Worksheets("Scripts") 
TotalRow = Sheet.UsedRange.Rows.Count 

これまでのところ、シートの合計行を取得しています。私は "キー"と呼ばれる列を持っています。キー列の合計行数をどのように数えることができますか？

Answer 1

列の行数を見つけるために、以下のコードを試してみてください - ちょうど個々の行、列

カウント見つけるために、（「B1048576」）/レンジ（「C1048576」）などをレンジにレンジ（「A1048576」）を変更します

Set ExcelObj = CreateObject("Excel.Application") 
ExcelObj.Visible = true 
Set ExcelConfigFile = ExcelObj.Workbooks.Open("C:\Users\pankaj.jaju\Desktop\Work.xlsx") 
Set Sheet = ExcelConfigFile.Worksheets("Scripts") 
TotalRow = Sheet.Range("A1048576").End(-4162).Row 'xlUp = -4162 
MsgBox TotalRow