使用 vba 强制表保存

Question

所以我有一个奇怪的问题。我需要将值插入到新创建的多值查找字段中。唯一的问题是这样的空列没有.Value 参数。我注意到打开表格，更改 anything 这将强制弹出“您需要保存此表格，等等等等......”。保存后，即使它仍然是空的（原文如此！）字段中的属性.Value 也会出现。

我需要使用 VBA 来完成这一切，我尝试过

DoCmd.Open("tablename") DoCmd.Save("tablename")

在创建后强制保存它，但 VBA 抱怨语法，即使我发现的每个示例都使用这些代码行。

也许还有另一种方法可以强制出现.Value 而不是强制保存表格？我是一无所知的ATM。

----

编辑：
我设法解决了它。而不是 DAO VBA 指令，我只是在设计视图中打开表格，保存它，然后关闭表格。

（在这种情况下）巨大的不同是在设计视图而不是简单的数据表视图中打开它。

在这两个视图中保存表格会产生两个不同的结果（有或没有 .Value 属性）。

Answer 1

我不确定您的代码当前是否使用 DAO；但是，它应该是。我找到了一位与您有类似问题的用户，另一位用户能够帮助他们：Creating a Multi Value Field through DAO works, but Access has problem saving it。

我想为你描绘的不同之处在于你想要修改：

.Properties.Append .CreateProperty("RowSourceType", dbText, "Table/Query")
.Properties.Append .CreateProperty("RowSource", dbText, _
                                       "SELECT [Last Name] FROM Employees")

到

.Properties.Append .CreateProperty("RowSourceType", dbText, "Value List")
.Properties.Append .CreateProperty("RowSource", dbText, _
                                       "Your;Values;Here")