Cellule maitresse

Résolu/Fermé

julemoque Messages postés 21 Date d'inscription mercredi 4 juillet 2012 Statut Membre Dernière intervention 4 mars 2013 - 25 févr. 2013 à 14:34
julemoque Messages postés 21 Date d'inscription mercredi 4 juillet 2012 Statut Membre Dernière intervention 4 mars 2013 - 26 févr. 2013 à 13:30

Bonjour,

je cherche comment faire pour avoir une celleule "maitresse"
Je m'explique, exemple dans a1 je tape 10 je veux alors que dans b1 =10 mais si je tape 20 dans a1 alors dans b1 =30 c'est a dire que b1 additionne a1 a chaques entrées.
Peut etre pas possible!!
Merci à tous.

Cordialement.

A voir également:

Aites en sorte que la cellule a1 affiche exactement ce qui est montré sur cette image. quel mot apparaît en b1 ?
Faites afficher avec un fond coloré les cellules qui contiennent une valeur comprise entre 250 et 350. quel nombre est dessiné en surbrillance ? - Forum VB / VBA
Aller à la ligne dans une cellule excel - Guide
Ce programme est écrit en python. il construit un mot secret dans une variable mais il ne l'affiche pas. modifiez-le pour qu'il affiche le mot secret. exécutez-le. quel est ce mot secret ? ✓ - Forum Python
Excel cellule couleur si condition texte - Guide

3 réponses

Réponse 1 / 3

via55 Messages postés 14512 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 janvier 2025 2 740
25 févr. 2013 à 15:22

Bonjour

Tu peux le faire par VBA

Alt F11 pour ouvrir l'éditeur

Tu selectionne ta feuille dans la fenetre gauche
dans la fenetre droite tu entres le code suivant

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
ActiveSheet.Range("B1").Value = ActiveSheet.Range("B1").Value + ActiveSheet.Range("A1").Value
End Sub

Cdlmnt

julemoque Messages postés 21 Date d'inscription mercredi 4 juillet 2012 Statut Membre Dernière intervention 4 mars 2013
25 févr. 2013 à 16:11

Merci!
Mais il y a un probleme sur cette ligne car elle se met en rouge ActiveSheet.Range("B1").Value = ActiveSheet.Range("B1").Value + ActiveSheet.Range("A1").Value
Et pour moi la VBA c'est du chinoi ;)

Cdt

via55 Messages postés 14512 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 janvier 2025 2 740
25 févr. 2013 à 19:30

re,

Dsl je m'étais absenté
Normalement ça devrait marcher
Si tu peux poster un exemplaire de ton fichier allégé et anonymé sur cjoint.com et indiquer le lien dans un prochain message je pourrais peut être y voir plus clair

Cdlmnt

Réponse 2 / 3

julemoque Messages postés 21 Date d'inscription mercredi 4 juillet 2012 Statut Membre Dernière intervention 4 mars 2013
26 févr. 2013 à 09:26

Bonjour,

Je suis de retour,
Je vais rééssayer et je te tiens au courrant car je ne sais pas comment faire pour envoyé le fichier (et oui je suis un peu bebête ;-) )
Encore merci.

julemoque Messages postés 21 Date d'inscription mercredi 4 juillet 2012 Statut Membre Dernière intervention 4 mars 2013
26 févr. 2013 à 09:48

J'ai essayé sur une feuille vierge mais ça ne fonctionne pas.
Et si non sans la VBA cela ne peut pas se faire?

Cdt

via55 Messages postés 14512 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 janvier 2025 2 740
26 févr. 2013 à 11:34

Bonjour,

Sans vba non je ne penses pas
Voilà un exemple avec mon code qui fonctionne

https://www.cjoint.com/?0BAlF5P38Lh

(Faire Alt F11 pour ouvrir l'editeur et voir le code)

Cdlmnt

Réponse 3 / 3

julemoque Messages postés 21 Date d'inscription mercredi 4 juillet 2012 Statut Membre Dernière intervention 4 mars 2013
26 févr. 2013 à 13:30

Re,

Merci!! c'est SUPER ça marche je devais faire une mauvaise manip.
Toutes mes excuses.

A+ et encore MERCI
Cordialement.

Discussions similaires

PIX

Comment enlever le rouge sur la photo svp ?

Supprimer une couleur d'une image

Notice montre MINGRUI

Programme python