Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Help with Tree View functionality.....
Hi Experts,
I'm using the tree view functionality, where the node values are taken from a cell. Using the following code, With TreeView1.Nodes ..Clear Set nodX = .Add(, , "CName", Worksheets("Cert_Details").Range("C_Name").Value) Set nodX = .Add("CName", tvwChild, "Path", Worksheets("Cert_Path_module").Range("Path").Value ) Set nodX = .Add("Path", tvwChild, "Mod1", Worksheets("Cert_Path_module").Range("Module_1").V alue) Set nodX = .Add("Path", tvwChild, "Mod2", Worksheets("Cert_Path_module").Range("Module_2").V alue) Set nodX = .Add("Path", tvwChild, "Mod3", Worksheets("Cert_Path_module").Range("Module_3").V alue) Set nodX = .Add("Path", tvwChild, "Mod4", Worksheets("Cert_Path_module").Range("Module_4").V alue) Set nodX = .Add("Path", tvwChild, "Mod5", Worksheets("Cert_Path_module").Range("Module_5").V alue) Here is my question. If i have few cells that do not have any values for ex.Worksheets("Cert_Path_module").Range("Module_1" ).Value)... then i want that tree node with this cell value to be deleted, rather than having a blank tree node. Any Suggestions??? Thanks for your help. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Help with Tree View functionality.....
Depending exactly what you are doing, you can probably simplify the code
somewhat with a loop; Dim i as long with Worksheets("Cert_Path_module") For i=1 to 10 With .Range("Module_" & i) if .Value<"" Then Set nodX = .Add("Path", tvwChild, "Mod" & i,.... ....etc NickHK wrote in message oups.com... Hi Experts, I'm using the tree view functionality, where the node values are taken from a cell. Using the following code, With TreeView1.Nodes .Clear Set nodX = .Add(, , "CName", Worksheets("Cert_Details").Range("C_Name").Value) Set nodX = .Add("CName", tvwChild, "Path", Worksheets("Cert_Path_module").Range("Path").Value ) Set nodX = .Add("Path", tvwChild, "Mod1", Worksheets("Cert_Path_module").Range("Module_1").V alue) Set nodX = .Add("Path", tvwChild, "Mod2", Worksheets("Cert_Path_module").Range("Module_2").V alue) Set nodX = .Add("Path", tvwChild, "Mod3", Worksheets("Cert_Path_module").Range("Module_3").V alue) Set nodX = .Add("Path", tvwChild, "Mod4", Worksheets("Cert_Path_module").Range("Module_4").V alue) Set nodX = .Add("Path", tvwChild, "Mod5", Worksheets("Cert_Path_module").Range("Module_5").V alue) Here is my question. If i have few cells that do not have any values for ex.Worksheets("Cert_Path_module").Range("Module_1" ).Value)... then i want that tree node with this cell value to be deleted, rather than having a blank tree node. Any Suggestions??? Thanks for your help. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Tree view in Excel | Excel Discussion (Misc queries) | |||
tree view | Excel Programming | |||
tree view control | Excel Programming | |||
tree view control | Excel Programming | |||
tree view control | Excel Programming |