Excel VBA开发

一、Excel添加treeview控件

如果是以VBA中为窗体添加，菜单：工具->附加控件，从中选择“Microsoft TreeView Control”；

在控件工具箱中点击其它控件，从中选择“Microsoft TreeView Control”。

二、treeview控件加载菜单：

●TreeView控件是以树形结构显示数据的控件。利用TreeView控件，可以设计出树形结构图，便于用户选择不同的项目。

●要使用TreeView控件，需要首先将其添加到控件工具箱，控件名称为“Microsoft TreeView Control 6.0(p4)”。

使用TreeView控件时应注意的几点：

　●在TreeView控件中添加节点的方法是使用Add方法，即Set NewNode=TreeView1.Nodes.Add（字符串1，节点参数，字符串2，字符串3）。

这里“NewNode”是用户定义的Node对象变量；

1.“字符串1”表示添加的节点是同级节点还是子节点。如果省略表示添加的节点是同级节点，如果设置了字符串1，表示添加的是子节点；

2.“节点参数”为添加节点类别的参数，如果添加的节点是同级节点，则该参数值为tvwNext，如果添加的节点是子节点，则该参数值为tvwChild；

3.“字符串2”表示添加节点的名称，通过它可以对该节点进行操作和访问；

4.“字符串3”表示添加节点的标题，也就是TreeView控件中的文字。

 ●展开TreeView控件节点的方法是将Expanded属性设置为True，即TreeView1.Nodes(i).Expanded=true.

  如果要收缩节点，则要将Expanded属性设置为False，即TreeView1.Nodes(i).Expanded=False.

●把节点与节点之间的“树线”显示出来的方法是将LineStyle属性设置为tvwTreeLine,即TreeView1.LineStyle=tvwTreeLine。

●读取TreeView控件节点数量的方法是使用Count属性，即n=TreeView1.Nodes.count。

●读取TreeView控件标题文本的方法是使用Text属性，即MyText=Treeview1.Nodes(i).text，其中，Nodes(i)为TreeView控件的第i个节点，i为节点的索引值。

●判断节点是否被选中的方法是使用Selected属性，即TreeView1.Nodes(i).selected,如果选中某节点，则selected属性为True, 反之则返回False。

 ●删除节点的方法是使用Remove方法，即TreeView1.Nodes.Remove TreeView1.SelectedItem.Index,这里Remove方法的唯一参数是TreeView1.SelectedItem.Index，表示被选中的待删除节点的Index值。