//取本地文件C:\VBA.xlsx有数据的起始行列号和结束行列号
  dir:="C:\\VBA.xlsx";
  sheet:="Sheet1";
  ret:=rdo2 ExcelGetDataRange2(dir,sheet,row_start,col_start,row_end,col_end);
  if ret then
  begin
    return array("row_start":row_start,"col_start":col_start,"row_end":row_end,"col_end":col_end);
  end;
  return 0;