XL 2016 Ajout TOUPIE sur la cellule choisi ( active )

tuti · 31 Mai 2021

bonjour,
dans un point securité, j'ai mis à disposition de l'agent un tableau de pointage de personne qui rentre sur le site

j'ai vu que cela se nommer TOUPIE ( cela me conviens très bien )
mais je coince sur l'affectation de la cellule cible

avec une seul toupie,
est il possible que celle ci affecte la cellule active ?
( si A1 puis A2 .... )
dans mon essai, que je sois en A1 ou en A10, cela affectais uniquement la cellule A1

merci

job75 · 3 Juin 2021

Bonjour tuti, cathodique,

La toupie n'est pas du tout indispensable, il suffit d'affecter des raccourcis clavier à ces 2 macros :

VB:

Sub Plus()
'raccourci clavier Ctrl+P
ActiveCell = Val(ActiveCell) + 1
End Sub

Sub Moins()
'raccourci clavier Ctrl+M
ActiveCell = Val(ActiveCell) - 1
End Sub

A+

cathodique · 3 Juin 2021

job75 à dit:
Bonjour tuti, cathodique,

La toupie n'est pas du tout indispensable, il suffit d'affecter des raccourcis clavier à ces 2 macros :

VB:

Sub Plus() 'raccourci clavier Ctrl+P ActiveCell = Val(ActiveCell) + 1 End Sub Sub Moins() 'raccourci clavier Ctrl+M ActiveCell = Val(ActiveCell) - 1 End Sub

A+

Bonsoir @job75 ,

Pour moi aucun souci. Je travaille que sur mon pc donc en local.
Cependant, tuti veux faire fonctionne le sur Excel online. Il semble qu'il ne prenne pas en charge les macros.

Bonne soirée.

job75 · 3 Juin 2021

D'accord alors pas de macro.

Voyez le fichier joint qui utilise le calcul itératif et cette formule en C5 :

Code:

=C5+(CELLULE("address")=CELLULE("address";C5))*(($C$3="Plus")-($C$3="Moins"))

à recopier où vous voulez.

tuti · 3 Juin 2021

@job75
je rencontre une erreur sur ton document

cathodique · 3 Juin 2021

job75 à dit:
D'accord alors pas de macro.

Voyez le fichier joint qui utilise le calcul itératif et cette formule en C5 :

Code:

=C5+(CELLULE("address")=CELLULE("address";C5))*(($C$3="Plus")-($C$3="Moins"))

à recopier où vous voulez.

Merci Job75. Fonctionne chez-moi.
Mais il m'a fallu mettre le curseur dans la barre de formule, valider pour qu'ensuite la touche F9 soit opérationnelle.
Sauf que la diminution va au-delà de zéro. Tuti à juste titre, veut que ça s'arrête à 0 plus que c'est un nombre de visiteurs.

Bonne soirée.

tuti · 3 Juin 2021

j'ai fait comme mon vdd et cela fonctionne

question
peux on déporter le calcul dans une autre cellule tout en pointant modifiant une cellule cible qui bouge dans le temps

exemple
calcule en A1
mais le clique sur F9 incrémente B1 le matin et B2 l'après midi ( se décalle d'une cellule chaque jour )

job75 · 3 Juin 2021

Comme indiqué la touche F9 modifie la cellule sélectionnée si elle contient la formule.

tuti · 4 Juin 2021

je n'avais pas compris que la cellule devait contenir la formule

dans ce cas,
via la macro il était possible de venir se positionner sur la bonne cellule ( de la date ) et en fonction de l'heure de la journée ( avant 12hh0 ou après 12h00 ) pour une histoire de service matin et après midi
est il possible de remplacer ce bout de macro par une formule ?
( il ne seras pas nécessaire de verrouiller les autres cellules, un simple "bon" positionnement devrait être bon)

cathodique · 4 Juin 2021

tuti à dit:
je n'avais pas compris que la cellule devait contenir la formule

dans ce cas,
via la macro il était possible de venir se positionner sur la bonne cellule ( de la date ) et en fonction de l'heure de la journée ( avant 12hh0 ou après 12h00 ) pour une histoire de service matin et après midi
est il possible de remplacer ce bout de macro par une formule ?
( il ne seras pas nécessaire de verrouiller les autres cellules, un simple "bon" positionnement devrait être bon)

D'après ce que j'ai lu hier Excel online n'accepte pas les macros.
Il faut donc que tu les oublies complètement.
En effet, je pense qu'il faut supprimer la protection de la feuille, reprendre sur toutes les cellules concernées la formule de Job75 (que je salue) et enregistrer le fichier sous xlsx.
Cependant, tu n'auras aucune pérennité de tes données. Là, on doit utiliser la touche F9.
Or, d'après moi si l'utilisateur par inadvertance tape une autre touche: bonjour les dégâts.
Alors pourquoi ne pas utiliser le fichier en local?

job75 · 4 Juin 2021

Bonjour tuti, cathodique,

cathodique à dit:
Sauf que la diminution va au-delà de zéro. Tuti à juste titre, veut que ça s'arrête à 0

Pour borner utiliser la fonction MAX :

Code:

=MAX(;C5+(CELLULE("address")=CELLULE("address";C5))*(($C$3="Plus")-($C$3="Moins")))

A+

tuti · 4 Juin 2021

je verrais à l'usage
mais je pense utiliser la version online sans usage de la macro
( désolé pour le travail que je vous ai demander en plus pour ne pas l'utiliser derrière )

je pourrais faire une synchro local pour utiliser le document
mais je ne suis pas responsable du périmètre
si il ne sont pas en mesure de corriger le fichier a posteriori, je risque de regretter d'avoir voulu les aider

job75 · 4 Juin 2021

tuti à dit:
je verrais à l'usage
mais je pense utiliser la version online sans usage de la macro

Eh oui et c'est le but de ma dernière proposition.

XL 2016 Ajout TOUPIE sur la cellule choisi ( active )

tuti

XLDnaute Occasionnel

job75

XLDnaute Barbatruc

cathodique

XLDnaute Barbatruc

job75

XLDnaute Barbatruc

Pièces jointes

tuti

XLDnaute Occasionnel

cathodique

XLDnaute Barbatruc

tuti

XLDnaute Occasionnel

job75

XLDnaute Barbatruc

tuti

XLDnaute Occasionnel

cathodique

XLDnaute Barbatruc

job75

XLDnaute Barbatruc

Pièces jointes

tuti

XLDnaute Occasionnel

job75

XLDnaute Barbatruc

Discussions similaires