Activez JavaScript dans le navigateur pour afficher les pages d'aide de LibreOfficeDev

Fonction FindObject

Permet d'adresser un objet pendant l'exécution par un paramètre au format chaîne de caractères via le nom de l'objet.

Par exemple, la commande suivante :


MyObj.Prop1.Command = 5

correspond au bloc de commandes suivant :


Dim ObjVar as Object
Dim ObjProp as Object
ObjName As String = "MyObj"
ObjVar = FindObject( ObjName As String )
PropName As String = "Prop1"
ObjProp = FindPropertyObject( ObjVar, PropName As String )
ObjProp.Command = 5

Cela permet de créer des noms dynamiquement pendant l'exécution. Exemple :

"TextEdit1" à "TextEdit5" dans une boucle pour créer cinq noms de contrôles.

Voir aussi : FindPropertyObject

Syntaxe :


FindObject( ObjName As String )

Paramètres :

ObjName : chaîne spécifiant le nom de l'objet à adresser pendant l'exécution.

Codes d'erreur :

5 appel de procédure incorrect

12 variable non définie