Hallom
jep ich versuchs einfach mal so, aber da ich Newbie in
Sachen VBA bin, dauert das so seine Zeit.
Hast Du ne Idee wie ich es machen kann?
Hab da mal schon was ausgearbeitet:
Dim objTV As Object
Dim nod As Node
Set objTV = Me![TreeView].Object
'Knoten für 1. Ebene
Set nod = objTV.Nodes.Add(Key:="M1", Text:="Module 1")
Set nod = objTV.Nodes.Add(Key:="M2", Text:="Module 2")
usw.
'Knoten für 2. Ebene zum Knoten 'Module 1'
Set nod = objTV.Nodes.Add(Relative:="M1", Relationship:=tvwChild, Key:="F1", Text:="Form 1")
Set nod = objTV.Nodes.Add(Relative:="M1", Relationship:=tvwChild, Key:="F2", Text:="Form 2")
usw.
könnte es so funzen???
Bis dann
und danke für den Tip!!!
Hans