主题：[求助]新建行引用录入目录树节点内容

搂住研究目录树时间不短了吧，这样试试：

Dim tr As WinForm.TreeView = Forms("材料目录").Controls("TreeView1")
Dim nd As WinForm.TreeNode = tr.SelectedNode

tables("==").addnew()

tables("==").current("分类") = nd.fullpath