4D View v16PV FIXER FORMULE CELLULE |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D View v16
PV FIXER FORMULE CELLULE
|
PV FIXER FORMULE CELLULE ( zone ; colonne ; ligne ; formule ) | ||||||||
Paramètre | Type | Description | ||||||
zone | Entier long |
![]() |
Zone 4D View | |||||
colonne | Entier long |
![]() |
Numéro de colonne de la cellule | |||||
ligne | Entier long |
![]() |
Numéro de ligne de la cellule | |||||
formule | Chaîne |
![]() |
Formule | |||||
L’exemple suivant crée une incrémentation vers le bas à partir d’une cellule de type numérique. Si la valeur de cette dernière est modifiée ultérieurement, l’incrémentation se mettra à jour automatiquement par l'action des formules que nous plaçons dans les cellules avec PV FIXER FORMULE CELLULE.
C_ENTIER LONG($NombreCopies) //Le nombre de copies à effectuer
C_ENTIER LONG($Colonne;$Ligne) //Coordonnées de la cellule à recopier
C_ENTIER LONG($Indice) //Indice de boucle
C_TEXTE($Nom) //Nom de la cellule de départ
PV LIRE CELLULE COURANTE(Zone;$Colonne;$Ligne)
Si(PV Lire type valeur cellule(Zone;$Colonne;$Ligne)=pv type valeur nombre) //Vérification du type
$NombreCopies:=Num(Demander("Combien de cellules vers le bas désirez-vous incrémenter ?";"5")) //5 par défaut
Si($NombreCopies>0) //Validé
$Nom:=PV Lire nom cellule(Zone;$Colonne;$Ligne) //Récupération du nom
Si($Nom="") //Pas de nom ?
$Nom:="COL"+Chaine($Colonne)+"LI"+Chaine($Ligne) //À présent elle en a un
PV FIXER NOM CELLULE(Zone;$Colonne;$Ligne;$Nom) //nom de type "COL2LI3"
Fin de si
Boucle($Indice;$Ligne+1;$Ligne+$NombreCopies) //$NombreCopies boucle(s)
PV FIXER FORMULE CELLULE(Zone;$Colonne;$Indice;"="+$Nom+"+"+Chaine($Indice-$Ligne)) //Incrémentation
Fin de boucle
Fin de si
Sinon //Type incorrect
ALERTE("La cellule de départ doit être de type numérique")
Fin de si
Produit : 4D View
Thème : PV Valeur de cellule
Numéro :
15917
Nom intl. : PV SET CELL FORMULA
Créé : 4D View 6.8
4D View - Langage ( 4D View v16)