高手请看：20 分 我想给50 分，但是系统只让给20分，对不起大家了，有机会一定补上！！！

Question

希望下面文章可以帮助你。在这个例子中，每一次敲击鼠标都会使 Microsoft Excel 工作单中的单元更新 Visual Basic 的 TextBox 控件的内容。要试用此例，必须启动 Microsoft Excel，打开一个新的名叫 Sheet1 的工作单，在第一列中放入一些数据。在 Visual Basic 中，创建一个有 TextBox 控件的窗体。把代码粘贴到声明部分，然后按 F5 键运行该程序。Private Sub Form_Click ()
   Dim CurRow As String
   Static Row   ' 工作单的行数.
   Row = Row + 1   ' 增加行.
   If Row = 1 Then   ' 只第一次.
      ' 确保连接不是活动的.
      Text1.LinkMode = 0
      ' 设置应用程序的名字和题目名.
      Text1.LinkTopic = "Excel|Sheet1"   
      Text1.LinkItem = "R1C1"   ' 设置 LinkItem.
      Text1.LinkMode = 1   ' 设置 LinkMode 为自动.
   Else
      ' 在数据项目中更新行.
      CurRow = "R" & Row & "C1"
      Text1.LinkItem = CurRow   ' 设置 LinkItem.
   End If
End Sub

Answer 1

您给的例子不是我所需要的，但是还是非常谢谢您！您给的例子是为了从VB向MS Excel发送数据
用的，不是在Visual Basic 6.0 中，获得已经建立好的MS Excel 2000 电子数据表的列数和某列的行数。

Answer 2

你不会先录段宏吗？在看它的代码。只要在excel里能做的。都有代码啊。