code pour calcul sous exel Résolu

Question

Bonjour,

j'aurai besoin d'un code qui me fasse une multiplication entre une cellule où le chiffre exsite déjà ( le prix) et une autre cellule où cette fois ci c'est à  l'utilisateur de saisir le chiffre ( la quantité ).

Ainsi je voudrais qu'automatiquement dés que l'utilisateur rentre la quantité, le montant s'affiche dans une autre cellule.

J'espère mettre fait comprendre.
Merci à vous.
romain

mortalino · Accepted Answer

Bon 
la protection des cellules sert à interdire la modification d'une plage de cellule.

Pour ton code, vas dans 

Private Sub ThisWorkBook_Open()
    Range("C1").Select
    ActiveCell.FormulaR1C1 = "=RC[-2]*RC[-1]"
End Sub

Voilà, t'as le code !

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

cs_Jack · Answer

Salut
C'est vraiment la base de ce qu'on peut faire dans un tableur !
Regarde dans l'aide de Excel, tout y est expliqué.
Pour entrer un calcul dans une cellule, il suffit de commencer par le signe =

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accro

Molenn · Answer

??


Un code pour ça ? Alors que c'est la base de l'utilisation d'Excel ? Il te faut absolument du code pour faire cette opération ?


Parce que sinon : 


A1 : Ton prix (déjà renseigné donc). B1: la quantité (que ton utilisateur va mettre) C1: =A1*B1 et c'est magique, ça fonctionne ! Et ça se met à jour en dynamique si dans tes options de calcul, tu as bien de coché Calcul automtique, autrement, tu rafraichis en appuyant sur F9.


 


S'il faut absolument du code ben :


range("C1").value = Range("A1").value * range("B1").value mais bon, je ne vois vraiment pas l'intérêt. Ou alors, c'est que tu n'es pas assez précis (du style, ce n'est pas dans les cellules que sont tes chiffres, mais dans des textBox d'un userform dans ce cas ... Précise précise ^^)


 


Molenn

CGEAL1 · Answer

ce qui a c'est qu'il me faut en dur un code sous vb pour que lorsque l'utilisateur rentre la quantité AUTOMATIQUEMENT  le montant s'affiche.

merci

mortalino · Answer

Jack bat Molenn de 6 secondes.

[auteurdetail.aspx?ID=823629 CGEAL1] ce que tu ne comprends pas, c'est pour ce que tu demandes, tu as la réponse^^

Si le prix est dans B2, l'utilisateur te rentre le nombre en B3, et tu veux le résultat dans B4, bah dans B4 tu fais :

=B2*B3     [et appuie sur entrée]

Si tu veux du code, enregistre toi à faire ceci..

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

CGEAL1 · Answer

OK mais comme ceci fait parti d'un programme et comme je ni connai rien en programmation il me faut un code pour rendre cette opération automatique, ce code  sera ensuite  inséré sous vb.

merci

désolé pour mon manque compréhension.

mortalino · Answer

Bah comme je t'ai dit (et je ne peux pas le faire pour toi, je ne connais pas tes cellules)
enregistre toi à le faire, et tu auras un code. Je peux pas dire mieux, si je peux te filer un code bidon, qui à coup sûr ne te correspondra pas :

Range("B4").Select
ActiveCell.FormulaR1C1 = "=R[-2]C*R[-1]C"

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

CGEAL1 · Answer

je l'ai fait mais quel code il faut saisir sous vb pour rendre automatique cette opération?

mortalino · Answer

1/ T'es en vba excel ou tu pilotes excel via vb6 ?
2/ Oùse trouvent tes celllules "le prix" & "la quantité" ?
3/ Quelle est la cellule de destination ?

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

CGEAL1 · Answer

c'est une basic feuille de commande, donc je suis sous vb et je voudrai rendre automatique la saisi d'une opération.


le prix existe, l'utilisateur rentre sa quantité et là je voudrai que automatiquement le calcul se fasse.


 


merci désolé de vous prendre la tête

mortalino · Answer

ARgggghhh 

Mais tu dis "le prix existe", c'est bien, je suis content de le savoir, mais ça ne me dit pas ce que c'est ......

Un label, un texbox, etc.....

Sans ces éléments, on ne peut rien pour toi !
Et dans quoi saisi ton utilisateur ?
Et dans quoi le résultat doit-il apparaitre ?????

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

CGEAL1 · Answer

J'arrête de vous prendre la tête, je vais me débrouiller autrement.


merci pour ta disponibilité et ta patience.

mortalino · Answer

Tu ne me prends pas la tête, je veux bien t'aider, c'est juste qu'il me faut un peu plus de précisions, comme le nom de tes contrôles et le type, pour te donner le code !

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

tof008 · Answer

Salut mortalino! 
Ca y est c'est de nouveau la guerre des secondes pour le plus rapide lol?

         (Si la réponse vous convient, appuyez sur réponse acceptée...).

                           Noubliez pas de lire le REGLEMENT

tof008 · Answer

Salut mortalino! 
Ca y est c'est de nouveau la guerre des secondes pour le plus rapide lol?

         (Si la réponse vous convient, appuyez sur réponse acceptée...).

                           Noubliez pas de lire le REGLEMENT

cs_ZANUS · Answer

Salut,


Sub Macro1()
For i = 1 To 1
For j = 1 To 1
Cells(i, j + 2).Value = Cells(i, j) * Cells(i, j + 1).Value
Next j
Next i
End Sub


1/Bon, il faut quand même lancer la macro
2/On suppose que les données se trouvent en A1,B1 et le résultat en C3
3/Je comprends la réaction des autres. Une formule est quand même beaucoup plus simple.

mortalino · Answer

Salut Tof,
Salut Zanus,

en fait si j'ai bien compris il n'est pas avec excel mais des contrôles sur vb6 (et encore, pas sûr à 100 %)

Est ce que c'est compliqué de dire :

Bonjour,

Je travaille avec vb6, j'ai un label (lblPrix) contenant le prix d'un objet, j'ai une textbox (tbxQuantite) pour permettre l'utilisateur de rentrer le nombre d'objets, et un autre label (lblResultat) reprenant le résultat de la multiplication entre la valeur de lblPrix et de tbxQuantite.
Comment faire pour que l'opération dans lblResultat se fasse automatiquement, dès que  les valeurs changent dans lblPrix & tbxQuantite ?

Merci

Qu'en pensez vous ?
Comme je lui ai dit, il ne me prend pas la tête, c'est juste que c'est malheureux  d'être déjà sur la 2ème page et ne pas savoir s'il est en vba ou vb6, et ne pas connaitre les contrôles utilisés !

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

Molenn · Answer

Quand je pense que je me suis fait griller pour 6 secondes !!! 
Mais j'ai une excuse : la dernière fois, on m'a dit qu'on demandait du code et pas des formules EXCEL, alors, j'ai eu un temps de réflexion, devais-je poster ? Et puis, après un grand travail sur moi-même, j'ai décidé que oui, ça valait le coup (tout ça en 6 secondes oui, je suis très rapide ^^).

En fait, le truc qui pose pb, c'est qu'on a l'impression qu'il est en VB, mais le titre de la question est Calcul sous Excel.


 


Mais je rejoins Mortalino : exposer clairement son besoin (sans forcément tout détailler, mais un minimum de précision), c'est encore le meilleur moyen d'avoir la réponse rapidement et sans 2 pages de blabla ...
Parce qu'après la question, on ne sait toujours pas où l'utilisateur saisit sa quantité, ce qui est le minimum.

Enfin ... Un jour peut être on aura la réponse... Peut être ...

Molenn

jrivet · Answer

Salut tout le monde.


De toute facon il s'en tape j ai l'impression il a du rester sur "J'arrête de vous prendre la tête, je vais me débrouiller autrement."

Bravo Mortalino tu as reussi a faire peur au Petit.






@+, Julien

mortalino · Answer

Pourtant j'ai pas une tête à faire peur 

Quoi que là (pas habitué à me lever à 7h, enfin aussi tôt quoi !) j'ai la tête de qqun qui a fait la bringue cette nuit !

Je crains effectivement vu son message qu'il abandonne ce Topic. Et pourtant, vu l'heure de sa dernière connection, il a lu les messages jusqu'à Zanus. Et Dix contre Un qu'il revient se logguer aujourd'hui !
Je remplace temporairement Jack pour la boule de cristal, mais c'est pas encore au point (sinon, j'aurai su de quoi notre ami [auteurdetail.aspx?ID=823629 CGEAL1]parle) 

Molenn, en fait je pense que c'est pas une mauvaise chose, moi aussi j'y ai réfléchît et je pense que suivant les situations, c'est pas plus mal d'avoir l'équivalent VBA en formule excel ! Donc tes réponses Excel sont plus que les bienvenues.

Tiens, ça me fait pensé, rendez vous sur un futur topic........

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

CGEAL1 · Answer

Merci les gars,j'en convien ,je n'arive pas à me faire comprendre car je découvre Vba  ( pas vb6).

alors, l'utilisateur saisi la quantité dans la cellule jointe a la cellule des prix et, si possible j'aimerai que le calcul se réalise et s'inscrive dansla cellule à coté de la cellule quantité.

bon courage, merci pour votre patience.

jrivet · Answer

Re,


 CGEAL1: Dans ce cas tout ce qui t'as ete proposé devrais fonctionné encore faut il l'essayer.

Je ne vais faire que répéter les autres
Sans Code:
Admettons que :
- le prix soit en A1 
- La quantité a saisir en B1
- Le résultat en C1

Place toi sur C1 Tape la chose suivante dans la cellule =A1*B1 
Le seule truc c'est qu il te faudra protéger la cellule.

Si tu veux ABSOLUMENT le faire avec du code cela aussi t'as déja été proposé.

Si tu n'arrive pas encore à le faire expose ton problème plus clairement OU est ce que tu coiunces exactement.

Et essaie de ne pas expliquer en une ligne seulement en répétant la même chose que dans tes autres messages.






@+, Julien

CGEAL1 · Answer

c'est protéger la cellule?


merci

mortalino · Answer

Salut CGEAL,

Qu'est ce qui est protégé ?

Sinon, ton résultat, tu le veux en code ou en formule excel ?
Et tes données, (prix, quantité, résultat) doivent se trouver où ? (A1, B1, A2 ?)

merci

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

jrivet · Answer

Re,
: CGEAL1 : S il te plait lit ce qu on te marque, je te demandais
Si tu n'arrive pas encore à le faire expose ton problème plus clairement OU est ce que tu coiunces exactement.

Et essaie de ne pas expliquer en une ligne seulement en répétant la même chose que dans tes autres messages.

Et toi tu réponds:  c'est protéger la cellule?

être débutant ne t'empêche pas de bien t'exprimer.

@+, Julien

mortalino · Answer

Du coup, ce topic est celui le plus vu de la page FullListe ! 
Il me semble qu'on n'est pas limité en caractère, non ?

   
http://www.smileycentral.com/?partner=ZSzeb008_ZNxdm414YYFR
@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

CGEAL1 · Answer

oui c'est quoi protéger une cellule?
et le résultat je le veux en code

merci

mortalino · Answer

Et tes données, (prix, quantité, résultat) doivent se trouver où ??????? (A1, B1, A2 ?)




@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

CGEAL1 · Answer

oui prix A1, quantité B1, montant C1

merci

tof008 · Answer

Pfffffou! Ca c'est de la discussion... Vous voulez pas recommencer le topic? Pour repartir sur des bases comprehensibles.... ? J'aurais jamais cru qu'un calcul sous Excel puisse faire autant de pages mdr!

         (Si la réponse vous convient, appuyez sur réponse acceptée...).

                           Noubliez pas de lire le REGLEMENT

jrivet · Answer

Re,

 Molenn le 22/08/2006 14:14:52  Dans la page 1 du topic t'a écrit ceci:
range("C1").value = Range("A1").value * range("B1").value 
Est ce que au moins tu as essayer?

Peu etre que tu ne sais pas ou le mettre dans ce cas IL SUFFIT de le dire

> tof008: Un nouveau Topic N'y changerait rien....

@+, Julien

jrivet · Answer

> mortalino Bien vu l'aveugle...

@+, Julien

CGEAL1 · Answer

merci pour votre pateince à tous, je m'excuse pour le dérangement

bonne continuation à vous

mortalino · Answer

Merci, 

bonne prog à toi aussi !

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

Molenn · Answer

Han !! Mon beau message en langage Bomba que je faisais sur un bloc-note parce que ma connexion est défaillante pour crier ma haine, et je me reconnecte, il y a une validation !!! Noooooooooooooon ... 


<met sa coquille de Caliméro>


C'est trop injuste ...

Tant pis, ma prose va aller rejoindre la corbeille avec tant d'autres choses. Quelle tristesse ...


Molenn

jrivet · Answer

> Molenn: Investi dans une bonne connection. tu pourras crier ta haine et ne plus te faire prendre de vitesse

@+, Julien

mortalino · Answer

Laisser tombé, je suis trop rapide. Vous ne m'aurez jamais !! 

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

Molenn · Answer

En fait, ce n'est pas ma connexion qui est mauvaise, c'est que je suis au boulot et qu'avec tous les pbs de proxy qu'on a ... Quand après avoir écrit 3 pelletées et que tu fais envoi, tu as un joli message Bad Gateway ou ce que tu veux, tu prends tes précautions ... Et voilà, résultat des courses, je suis à la bourre ... mais je me vengerais !

jrivet · Answer

>mortalino Ca va les chevilles? 

@+, Julien

mortalino · Answer

Pas encore assez large !! 

N'empêche, 8 topics sur 10 je vous grille ! 
Merci CSMS de Pcpt ! (je supose que tu ne l'as pas au taf ?)

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

jrivet · Answer

8 Topic sur 10? qu est ce que tu entends par la?
De tout facon pas besoin. on a pas les meme heures d'activite. (sauf aujourdh ui ou tu t'es levé tot) 

Gmail je ne jure que par Gmail. (et F5 aussi)

@+, Julien

Code pour calcul sous exel

41 réponses

Votre réponse

Discussions similaires