Bonjour,
Nous essayons de convertir un code VBA Excel en Windev16,
mais nous n'arrivons pas à traduire l'instruction "FOR EACH x IN y.
nous n’arrivons pas à trouver la bonne syntaxe.
Avez-vous une idée ?
exemple VBA Excel:
Dim Branch As Variant
Set AnOPCHDABrowser = ThisServer.CreateBrowser()
AnOPCHDABrowser.MoveToRoot
tvwBrowser.Nodes.Clear
For Each Branch In AnOPCHDABrowser.OPCHDABranches
tvwBrowser.Nodes.Add , , , Branch
Next Branch
Partager