Office中国论坛/Access中国论坛

标题: 在执行宏时如何查找某个表有没有 [打印本页]

---

作者: 蓝天8390    时间: 2013-7-4 21:15
标题: 在执行宏时如何查找某个表有没有
在执行宏时如何查找某个表有没有，如有，则执行宏，如没有，则给出提示并终止。请高手们邦邦忙，先多谢了！

---

作者: admin    时间: 2013-7-4 23:26
你在模块中建立一个函数,代码如下(参考cuxun的)

我贴个方法出来:
public Function IsTableed(ByVal TempTableName As String) As Boolean
''测试表是否存在
    If DCount("*", "MSysObjects", "Name='" & TempTableName & "'") = 0 Then
        msgbox "系统未发现此表;" & TempTableName
        IsTableed = False
    Else
        IsTableed = True
    End If

End Function

---

作者: admin    时间: 2013-7-4 23:27
在宏里可引用这个函数来判断

---

作者: 蓝天8390    时间: 2013-7-7 22:45
谢谢楼主，可我不会代码，用不来啊！

---

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)

Powered by Discuz! X3.3