最佳方法是你可以建立一个数据集在ThisWorkbook的设计视图里，然后在其它工作表中用代码引用编程。

具体做法：

第一步：由指定的数据库连接，添加一个新的数据源并选择表，视图和相关的列。

第二步：打开ThisWorkbook.vb设计。从工具箱中，选择一个DataSet ，并将它拖曳上设计视图的表面。 当下拉它时，会询问你选择类型化还是非类型化的DataSet 。选择类型化，在输入框中填入<your namespace>.MyDataSet，单击确定。在设计视图上应该可以看到MyDataSet1的图标。如果在C#环境下，需要在属性窗口里设置DataSet的访问属性为Public或Internal。

VB范例：

Dim patientAdapter As New MyDataSetTableAdapters.PatientsTableAdapter

  patientAdapter.Fill(Me.MyDataSet1.Patients)
Dim rxAdapter As New MyDataSetTableAdapters.PrescriptionsTableAdapter

  rxAdapter.Fill(Me.MyDataSet1.Prescriptions)

C#范例：

MyDataSetTableAdapters.PatientsTableAdapter ta = 

    new MyDataSetTableAdapters.PatientsTableAdapter();

  ta.Fill(myDataSet1.Patients);

第三步：打开Sheet1的设计视图。从数据菜单选择“添加新数据源”，这一次选择添加一个“对象”而不是一个数据库！在弹出的对话框中不要选择表适配器！选择打开你的项目名称-〉名字空间-〉MyDataSet。选中它然后单击确定。这一过程将创造一个对象在你的数据源的窗口。

 

第四步：选择数据源的窗口，你应该会看到MyDataSet对象。这个对象可以用来创建一个数据绑定在你的工作表里。所以你可以拖动这个对象到你的任何一个工作表中。单击并将它拖曳到Excel中的Sheet1中，它将创造了一个空表。选择这个表，并在属性格中按一下DataMember属性旁边的箭头，选择您要绑定的数据表。这样就完成了数据绑定。

 

你可以试着为每个工作表创建BindingSource对象，但记住只有一个DataSet实例。另外在每个工作表里，你需要添加以下代码：

Me.PatientsDataTableBindingSource.DataSource = Globals.ThisWorkbook.MyDataSet1