导入E表时遇到绞尽脑汁也解决不了的问题，求助各位高手！

bjcompass

据说是台湾人的导入例子，我进行了较大的加工，能比较方便的导入学员名单，现在我想再加上一个默认导入的学员班名是否存在的判断，于是把第1037语句改为第1038至1041语句，但是一旦判断学员班名存在就会出现“数据转换错误”提示。我把判断条件Dcount后面的条件更改了各种形式，要么提示“数据转换错误”，要么提示“错误2001，您取消了前次操作"。折腾了大半天也不知所踪。恼火！
请教各位版主和各位高手们给解惑，给改改这个例子吧，如果能解决请告知原因，学习。

yehf

1042            If re1("ACC_field") = "学员班" Then re2(re1("ACC_field")) = Me.sheet
不加判断的话, re1("ACC_field")会出校交款额,和me.sheet的文本类型不一致

roych

Dcount部分应先行判断，完毕之后再执行写入操作。。。实在搞不懂干吗写那么复杂的导入程序。{:soso_e127:}在Access中，只要Excel是标准格式的数据表，可以用很简单的代码进行导入的。
参考代码如下：
If DCount("*", "Zxiangmubiao", "学员班='" & Me.sheet.Value & "'") = 0 Then
         answer = MsgBox("系统中没有相同的学员班名，请重新设置工作表名。", 0, "系统提示：")
         Exit Sub
  Else
        If………Then
          ………………
        End If
       If………Then
           ………………
       End If
………………………………
End If

bjcompass

2楼朋友说的不合题意，只有学员班字段对应选择了e表里的“默认”列时，学员班才默认为[sheet]值。
roych版主正解，Dcount语句先行判断，运行成功 。不过我改成了
If DCount("*", "Zxiangmubiao", "学员班='" & Me.sheet.Value & "'") = 0 and re1("EXC_titel")="默认"  Then  .........
这样只有学员班项对应选择“默认”时判断才起作用，谢谢版主！
不过我仍然弄不清楚把3条件在一个语句判断，为什么就会出现错误？