sql能将excel的行号rowno()作为rst的字段

Question

在excel中可以执行以下语句。
  Sql = "Select Distinct " & _
     "f2 as FitPointsArr, " & _
     "f3 as StartTangentArr, " & _
     "f4 as EndTangentArr, " & _
     "f5 as Layer " & _
        "from [Sheet3$]  Where ObjectName like '%Spline%'"
请问：
  excel的行号能否作为SQL的记录集字段。行号输入输入到记录记录中。

Answer 1

应该不行,EXL的行号是取不到的

Answer 2

这个可以得到行号
Private Sub Command1_Click()
    Dim ex As Excel.Application
    Dim wb As Excel.Workbook
  
    Set ex = CreateObject("Excel.Application")
    Set wb = ex.Workbooks.Open("c:\1.xls")  ' 改成你的文件路径  在文件里写几个数试试
     Set sh = wb.Sheets(1)
  
     A = ex.ActiveSheet.UsedRange.Rows.Count '计算总行数
      B = ex.ActiveSheet.UsedRange.Columns.Count '计算总列数
    For i = 1 To A
     For j = 1 To B
      If sh.Cells(i, j) <> "" Then
       MsgBox "第" & i & "行" & "第" & j & "列的数据是" & sh.Cells(i, j)
       End If
      Next j
     Next i
    wb.Close
    ex.Quit
End Sub