PV FIND ONE

4D View v16

PV FIND ONE


PV FIND ONE ( zone ; critère ; où ; comparateur {; colonne ; ligne} )

Paramètre	Type	Description
zone	Entier long	Zone 4D View
critère	Chaîne	Chaîne à rechercher
où	Entier	0 = Formules; 1 = Valeurs
comparateur	Entier	0 = Contient; 1 = Égale
colonne	Entier long	Numéro de colonne de la cellule de départ
		Numéro de colonne de la cellule trouvée
ligne	Entier long	Numéro de ligne de la cellule de départ
		Numéro de ligne de la cellule trouvée

Description

La commande PV CHERCHER recherche critère parmi les cellules de zone. La recherche s’arrête à la première cellule répondant aux critères de recherche, s’il y en a une.

critère spécifie la chaîne de caractères à rechercher.

où indique dans quelle partie du tableur la recherche doit avoir lieu :

0 : recherche dans les formules
1 : recherche dans les valeurs

comparateur définit le type de comparaison :

0 : partielle (contient la valeur recherchée)
1 : totale (égale la valeur recherchée)

Si les paramètres optionnels colonne et ligne sont omis, la recherche débute en haut et à gauche de la zone.
Si colonne et ligne sont passés, ils désignent la cellule de zone à partir de laquelle doit démarrer la recherche.
La recherche s’effectue de haut en bas puis de gauche à droite à partir de la cellule de départ.

Après l’exécution de la commande, la première cellule éventuellement trouvée devient la nouvelle cellule courante. S’ils ont été passés à l’appel, les paramètres colonne et ligne contiennent alors ses coordonnées.

Si aucune cellule n’est trouvée par la recherche, la cellule courante demeure inchangée.

Exemple

Recherchons la première cellule contenant la réponse de l’utilisateur à une demande initiale. La recherche débutera à la cellule B3.

 C_TEXT($Critère) `Chaîne à rechercher

 C_LONGINT($OùChercher) `0=Formules / 1=Valeurs

 C_LONGINT($Comparateur) `0=Contient / 1=Égale

 C_LONGINT($Colonne) `Numéro de colonne de la cellule de départ

 C_LONGINT($Ligne) `Numéro de ligne de la cellule de départ

 

 $Critère:=Request("Quelle est la valeur à rechercher ?";"x")

 

 If($Critère#"")   `Critère renseigné

    CONFIRM("Recherche sur les formules ou les valeurs ?";"Valeurs";"Formules")

    $OùChercher:=OK `0=Formules / 1=Valeurs

 

    CONFIRM("Quel type de comparaison ?";"=";"Contient")

    $Comparateur:=OK   `0=Contient / 1=Égale

 

    $Colonne:=2 `Recherche à partir de la cellule B3

    $Ligne:=3

 

    PV FIND ONE(Zone;$Critère;$OùChercher;$Comparateur;$Colonne;$Ligne)   `Recherche

 End if

Voir aussi

PV FIND ALL
PV REPLACE ONE