主题：BOM目录树,高手请看

1、看不懂

2、节点有Fullpath属性，返回其路径，例如“计划工作站\基础数据管理\制造Bom管理”，根据这个找出命令行。

3、代码要编译才能执行，所以你这种方式不合适，应该将命令代码改为窗口名，然后：

Dim dr As DataRow

'找出dr

Forms(dr("窗口名")).Open()

大概就是这样，具体自己琢磨

1、通过目录树定位到对应的行，再打开窗口编辑，和常规的方法一样。

2、或者你用自定义函数，表中只保留函数名，这样就可以解决代码执行的问题。