我有一个Access数据库(不是由我制作),包含我公司的所有项目。现在我正在尝试使用VBA自动化我们在该数据库中创建新条目的方式。我们输入的数据来自excel文件,VBA是连接这两个文件的简便方法。
但是,我遇到了将值从excel粘贴到访问表单的问题,因为该表单中的某些组合框链接到表查询,并且出于某种原因使用combobox.value =“excel value”不起作用。我意识到,为了使其工作,我必须找到我想从excel传输的值的ID。
长话短说: 有没有办法在VBA的访问表列中查找特定值并返回该值的ID号(主键列)?仅供参考我对Access的了解有限
答案 0 :(得分:1)
DLookup()
功能执行此操作。
strProjectName = "excel value"
myID = DLookup("ID", "myTable", "ProjectName = '" & strProjectName & "'")
但这只有在标准值是唯一的(没有重复)时才有效。
如果找不到值,通常用Nz()
包装DLookup来处理NULL结果。