HWV
Terugkerende gebruiker
- Lid geworden
- 19 feb 2009
- Berichten
- 1.213
Beste,
Ik heb de volgende code om een treeview te maken, wat goed werkt.
Nu zou ik ook door willen klikken, is dat mogelijk dat ik bv bij de code
door klik naar een andere userform bv userform2
Ik weet niet of het mogelijk is, ik heb al speurwerk gedaan op het internetmaar kon het niet vinden.
Alle tips en misschien voorbeelden zijn welkom.
groet HWV
Ik heb de volgende code om een treeview te maken, wat goed werkt.
Nu zou ik ook door willen klikken, is dat mogelijk dat ik bv bij de code
Code:
Set nodX = .Add("C1", tvwChild, "C11", "Child 11")
Code:
Dim nodX As Node
TreeView1.CheckBoxes = False
With TreeView1.Nodes
.Clear
Set nodX = .Add(, , "R", "Hoofdmenu")
Set nodX = .Add("R", tvwChild, "C1", "Child 1")
nodX.Expanded = False
nodX.EnsureVisible
Set nodX = .Add("C1", tvwChild, "C11", "Child 11")
Set nodX = .Add("C1", tvwChild, "C12", "Child 12")
Set nodX = .Add("C1", tvwChild, "C13", "Child 13")
Set nodX = .Add("R", tvwChild, "C2", "Child 2")
nodX.Expanded = False
Set nodX = .Add("C2", tvwChild, "C21", "Child 21")
Set nodX = .Add("C2", tvwChild, "C22", "Child 22")
Set nodX = .Add("C2", tvwChild, "C23", "Child 23")
Set nodX = .Add("C2", tvwChild, "C24", "Child 24")
Set nodX = .Add("C2", tvwChild, "C25", "Child 25")
Set nodX = .Add("C2", tvwChild, "C26", "Child 26")
Set nodX = .Add("R", tvwChild, "C3", "Child 3")
nodX.Expanded = False
Set nodX = .Add("C3", tvwChild, "C31", "Child 31")
Set nodX = .Add("C3", tvwChild, "C32", "Child 32")
Set nodX = .Add("C3", tvwChild, "C33", "Child 33")
Set nodX = .Add("R", tvwChild, "C4", "Child 4")
nodX.Expanded = False
Set nodX = .Add("C4", tvwChild, "C41", "Child 41")
Set nodX = .Add("C4", tvwChild, "C42", "Child 42")
Set nodX = .Add("C4", tvwChild, "C43", "Child 43")
End With
TreeView1.Style = tvwTreelinesPlusMinusText
TreeView1.BorderStyle = ccFixedSingle
Ik weet niet of het mogelijk is, ik heb al speurwerk gedaan op het internetmaar kon het niet vinden.
Alle tips en misschien voorbeelden zijn welkom.
groet HWV