用VB怎么实现把电子表格中的数据自动录入到软件中去，请大家指教。

可以，例如：
Private Sub Command2_Click()
Dim EXAPP As Excel.Application
Dim WB As Excel.Workbook
Dim sht As Excel.Worksheet
Set EXAPP = CreateObject("excel.application")
Set WB = EXAPP.Workbooks.Open("d:\成绩表.xls")
Set sht = WB.Worksheets("总表")
sht.Activate
  arr=sht.Range("A3:AU30000")   'arr就是数据，读到您的软件的什么地方，您发挥吧
   WB.Close
Set sht = Nothing
Set WB = Nothing
Set EXAPP = Nothing
End Sub

我以前读大学的时候学过，但现在忘记了，你给我的代码，我调试的时候出现用记定义类型未定义，是什么原因

需在工程-》引用，然后 引用 EXCEL 对象。