Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Incrémenter et décréementer des cellules

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Kuma007lau
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
K

Kuma007lau

Guest
Hello la Team,

Mes connaissances étant assez limitées en VBA et formules complexes , je fais appel à votre savoir et astuces.

Je vous plante le décors avant tout.
C'est pour le suivit de cadres de clichage sérigraphique. 3 Formats existants avec pour chaque formats 7 maillages différents.
Le fichier Exel va servir à connaitre en instantané la quantité de cadres disponibles à différentes étapes, à savoir Pré encollés, Encollé Neufs et Encollés récup Puis sortie du site car retour fournisseur.
Le fichier sera maintenu à jour manuellement à chaque déplacement du cadre dans son processus de vie. Je cherches un moyen de rentre le fichier plus attractif que de la vulgaire saisie manuelle. Un bouton pour déplacer tel type de cadre dans une étape suivante.

Je vous joint le fichier de base
 

Pièces jointes

Trier par date Trier par votes
Re,

Je viens de trouver ici ce qu'il me faudrait.

Incrementer ou decrementer des cellules en cliquant

Bonjour, Comme je ne suis pas vraiment à l'aise en VBA si quelqu'un avait la gentillesse de me donner une piste .... J'ai mis les explications dans le fichier. Merci à tous ceux qui voudrons bien m'aider Bonnes fêtes
www.excel-downloads.com

Mais vu que je n'y connais rien qui pourrait m'aider à l'appliquer à mon fichier ?

Pour le moment j'ai ça comme solution

Code: 
 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 ActiveCell.Value = ActiveCell.Value + 1
 End Sub
 
  Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
 ActiveCell.Value = ActiveCell.Value - 1
 End Sub

Mais le clic droit est chiant car il ouvre la boite de Dialogue du clic Droit :mrgreen:
Il il y a la possibilité d'y attribuer le clic gauche + une touche.
Et puis seulement sur une sélection de cellules car un clic ailleurs que sur une cellule comportant un nombre, me ressort une erreur
Idem il faut cliquer sur la valeur de la cellule alors que n'importe où dans la cellule serait top

A voir donc...
 
Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…