Question

我已经通过RecordClone将子表单的记录源复制到记录集。此子表单源由查询（某些表）组成，并且此查询的所有字段都已重命名，例如，id_document为＆＃34; ID Document＆＃34;，date to＆＃34; Document Date＆＃34;。我需要的是获取这些新名称而不是原始名称。而不是id_document，我想得到＆＃34; ID Document＆＃34;。我试图让他们进入财产或fiels集合，但没有成功。如果你们中的任何人知道如何做到这一点，请帮助我。我很感激你的帮助。

提前感谢。

P.S。：这是我在查询设计视图中重命名该字段的方式：＆＃34; ID Document＆＃34;：id_document

Answer 1

看看Gord Thompson的这个优秀答案（这里很多人都很熟悉）：

How to export a table in access to CSV with dot in field names through VBA?

这并不完全是你正在做的事情（这个人想要从字段名称中删除＆＃34;。＆＃34;但是你正在做一些非常相似的事情。您可以从人行横道表中执行DLookup，以确定列的名称。

只需构建一个名为tblCrosswalk的新表，然后像这样填充：

Old           New
id_document   ID Document
date          Document Date
etc...        etc...

然后，在构建CSV标题行部分，而不是那些＆＃34;替换＆＃34;功能，把这个：

s = DLookup("New", "tblCrosswalk", "Old = '" & fld.Name & "'")

如何使用Access VBA获取列/字段名称

1 个答案: