[Résolu][Calc] Créer un compteur

[didier-56]

Bonjour, message en cours définitif
j'utilise le tableur pour faire des calculs d'automatisme.

J'ai besoin d'un compteur : à chaque recalcul de la feuille,

A1 = preset (nombre) valeur d'initialisation du compteur
A2 = preset (vrai ou faux) ordre d'initialisation
A3 = RAZ (vrai ou faux) Ordre de remise à zéro
A4 = Incrément (nombre) Valeur à ajouter à chaque comptage (positive ou négative)
A5 = Compte (vrai ou faux) Augmente (ou diminue) la valeur du compteur de la valeur de l'incrément
A6 = compteur (nombre)

A6 = Si( A2 ; A1; si( A3 ; 0 ; si( A5 ; A6 + A4 ; A6 )))

c'est tout simple mais ça fait une référence circulaire dès que A2 et A3 sont faux !




Il y a possibilité de mettre à zéro, ou une autre valeur d'initialisation (par ex. cellule A2 est vrai).

J'utilise libreoffice 5.0.5.2, sous window 7.
J'utilise oppenoffice 3.2 oracle sur buntu 10.04 LTS le Lynx Lucide

Si ça manque de précision, demandez-en moi.

Belle journée, didier.

[Churay]

Bonjour

Si ça manque de précision, demandez-en moi.

Yes...

la valeur augmente ou diminue de 1.

Quelle valeur ? Où ?

Il y a possibilité de mettre à zéro (par ex. cellule A2 est vrai).

Mettre à zéro : quoi ? Où ?

ou une autre valeur d'initialisation

Laquelle ? On la détermine comment ?

[didier-56]

Bonjour, je viens de mettre une nouvelle explication de ce que je veux faire, plus précise et en me rapprochant des règles de fonctionnement du site.
Je sais pas comment trouver la version exacte de window 7.
J'espére que tout va bien sinon je corrige la prochaine fois.



merci de ta réponse.

Didier

[micmac]

Bonjour,

règles de fonctionnement du site.

La balise de chapitre s'écrit avec un "C" majuscule. [Calc] et non [calc].

Cordialement

Ajout : Vous auriez pu indiquer aussi la version exacte de OpenOffice et de Ubuntu dans votre signature .

[Churay]

Bonjour

- Ne sachant pas comment les valeurs logique (Preset, RAZ, Compter) étaient modifiées, j'ai recours à une case à cocher.
- les modifications en A1, A4, A6 n'influent pas sur le compteur (A6)
- Par Preset, j'ai compris mettre le compteur à la valeur Préset (A1)
- Par RAZ, j'ai compris mettre à zéro la valeur Preset (A1) et le compteur (A6) et mettre à 1 l'incrément (A4)
- Toute modif de valeur dans une cellule autre que A1:A6, déclenche le compteur

Ajout : Petite modif pour que - les modifications en A1, A4, A6 n'influent pas sur le compteur (A6) soit toujours vrai

Cpt Didier-56.ods

[didier-56]

Bonjour

- Ne sachant pas comment les valeurs logique (Preset, RAZ, Compter) étaient modifiées, j'ai recours à une case à cocher.
- les modifications en A1, A4, A6 n'influent pas sur le compteur (A6)
- Par Preset, j'ai compris mettre le compteur à la valeur Préset (A1)
- Par RAZ, j'ai compris mettre à zéro la valeur Preset (A1) et le compteur (A6) et mettre à 1 l'incrément (A4)
- Toute modif de valeur dans une cellule autre que A1:A6, déclenche le compteur

Ajout : Petite modif pour que - les modifications en A1, A4, A6 n'influent pas sur le compteur (A6) soit toujours vrai

Cpt Didier-56.ods

Merci,
Normalement, le RAZ n'agit que sur le compteur, la valeur de preset est fixe ou à sa propre entrée, en mettant une référence à une autre case ou un calcul dans A1.
Quand je charge le document, ça prend pas les macros et le document est en lecture seule, les cases sont vides. (je me sens moins seul )
Mais je suis content de voir que tu as une solution et que donc c'est possible.
Belle journée, didier

Pour répondre à un message, utilisez le bouton RÉPONDRE et non le bouton CITER ce qui évite de citer l'ensemble du message précédent rendant la lecture très difficile.

[Churay]

Bonjour,

Quand je charge le document, ça prend pas les macros et le document est en lecture seule, les cases sont vides

Enregistre le fichier et ça devrait le faire...

Normalement, le RAZ n'agit que sur le compteur

Cpt Didier-56.ods

[didier-56]

Bonjour,
j'ai trouvé les options de sécurité pour charger les macros.
Les boutons A2 et A3 agissent et reviennent à zéro
Quand je clique sur le bouton compter, il passe à vrai ou faux et y reste.
J'ai encore dû rater une marche ! Merci de ton aide et belle journée à toi
didier

[Churay]

J'ai besoin d'un compteur : à chaque recalcul de la feuille,
L'option recalcul automatique n'ayant pas été enlevée, à chaque modification du contenu d'une cellule il y a recalcul.

Donc j'incrémente le compteur...

Les boutons A2 et A3 agissent et reviennent à zéro

A2 = preset (vrai ou faux) ordre d'initialisation

Un clic, l'ordre est exécuté : la valeur preset est reportée dans le compteur.
La case à cocher est désactivée pour permettre une nouvelle utilisation.

A3 = RAZ (vrai ou faux) Ordre de remise à zéro

Un clic, l'ordre est exécuté : RAZ du compteur.
La case à cocher est désactivée pour permettre une nouvelle utilisation.

Quand je clique sur le bouton compter, il passe à vrai ou faux et y reste.

A VRAI (case cochée), le compteur est actif : il est compté toute modification d'une cellule.
A FAUX (case décochée), le compteur est inactif : la modification d'une cellule n'entraîne pas l'incrémentation du compteur.

C'est le fonctionnement normal en fonction de ce que j'ai compris de l'énoncé.

[didier-56]

Ha ! ok, c'est super. Merci.

j'aurais surement besoin d'une version qui se déclenche au changement de valeur d'une case, je vais essayer de me débrouiller en apprenant l'usage des macros.
Bonne journée, Didier

[didier-56]

Bonjour,
j'ai maintenant un petit compteur qui fonctionne, il peut aussi servir pour la mise au point à tester une fonction avec plein de valeurs d'une variable.
Voir PJ

Code : Tout sélectionner

Rem  *****  Basic  *****

Function Compteur (Pas!, Init, Optional Max)

If Isnumeric (Init) Then 
	Compteur = Init      'Initialisation
	Goto 99
End If

If Isnumeric (Max) Then 
	If Pas >= 0 Then
		If Compteur >= Max Then
		Compteur = Compteur & " = Maxi"     'Message facultatif ajouter une
		Goto 99 '                            apostrophe avant & pour neutraliser     
		End If
	Else
		If Max >= Compteur Then 
		Compteur = Compteur & " = mini"     'Message facultatif
		Goto 99
		End If
	End If
End If

Compteur = Compteur + Pas      'Incrémentation

99 End Function


Sub Main

End Sub

Joyeux Léon