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

affichage du résultat d'un programme VBA dans une cellule

Créer une discussion

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
F

florieob

XLDnaute Nouveau
Bonjour à tous !

Je suis actuellement en train de travailler sur un projet informatique (rationnement de vaches laitières) et j'ai un petit souci avec une macro.
Cette macro doit consister à faire un calcul différent suivant si une cellule est identique à l'une ou à l'autre.

Mon problème est le suivant : il ne semble pas y avoir de souci dans le programme mais rien ne s'affiche dans la cellule qui est censée contenir le résultat. (la cellule appelée ConcentreProduction)
Le programme est ci-dessous. Merci d'avance 😱

Sub QuantiteConcentreProd()

If [Production] = [ProdUFL] Then
[ConcentreProduction] = ([ObjectifProd] - [Prod]) * 0.44 / [UFLConcentre]

If [Production] = [ProdPDIE] Then
[ConcentreProduction] = ([ObjectifProd] - [Prod]) * 48 / [PDIEConcentre]

Else: [ConcentreProduction] = ([ObjectifProd] - [Prod]) * 48 / [PDINConcentre]
End If
End If

End Sub
 
Trier par date Trier par votes
Re : affichage du résultat d'un programme VBA dans une cellule

Bonjour florieob, salut Pierrot 🙂

Oui, avec des tests corrects ça doit donner :

Code: 
Sub QuantiteConcentreProd()

If [Production] = [ProdUFL] Then
  [ConcentreProduction] = ([ObjectifProd] - [Prod]) * 0.44 / [UFLConcentre]
 
ElseIf [Production] = [ProdPDIE] Then
  [ConcentreProduction] = ([ObjectifProd] - [Prod]) * 48 / [PDIEConcentre]
 
Else
  [ConcentreProduction] = ([ObjectifProd] - [Prod]) * 48 / [PDINConcentre]

End If
 
End Sub
A+
 
Vote positif 0 Vote négatif
Re : affichage du résultat d'un programme VBA dans une cellule

Re, bonjour Job🙂

sous réserve d'avoir compris, on pourrait peut être également le coder ainsi :
Code: 
[ConcentreProduction] = ([ObjectifProd] - [Prod]) * (IIf([Production] = [ProdUFL], 0.44, 48) / [PDINConcentre])

@+
 
Vote positif 0 Vote négatif
Re : affichage du résultat d'un programme VBA dans une cellule

Re,

aarf, j'avais raté un truc... A tester....

Code: 
[ConcentreProduction] = ([ObjectifProd] - [Prod]) * (IIf([Production] = [ProdUFL], 0.44, 48) / IIf([Production] = [ProdUFL], [UFLConcentre], [PDINConcentre]))
 
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

Discussions similaires

X
  • Résolu(e)
Microsoft 365 VBA code qui efface un commentaire écrit dans une cellule, suivant le résultat d'une autre
2
Réponses
18
Affichages
1 K
xxexcel
X
B
  • Question Question
XL 2016 Par défaut Afficher le résultat d'un calcul "fait en VBA" dans une cellule
Réponses
3
Affichages
4 K
Modeste geedee
  • Question Question
XL 2010 Ecrire résultat d'un userform dans cellules
Réponses
4
Affichages
2 K
flstyle
A
  • Question Question
VBA EXCEL: introduire la dernière cellule non vide dans une formule
Réponses
3
Affichages
1 K
Aragon10
A
B
  • Question Question
VBA insérer une formule dans une cellule, avec, comme parametre, le résultat fonction
Réponses
2
Affichages
2 K
burzcairwen
B
R
  • Question Question
Résultat checkbox différents dans une cellule si l'une n'est pas cochée -Excel 2007.
Réponses
8
Affichages
3 K
Rgweltaz
R
F
  • Question Question
[VBA] Option de recherche dans une zone texte
2
Réponses
15
Affichages
7 K
job75
M
  • Question Question
Acutalisation du résultat d'une fonction sous vba si on change la valeur d'1 cellule
Réponses
13
Affichages
7 K
MaximeC
M
  • Question Question
Modifier une cellule avec la fonction offset dans une feuille de donnée avec VBA
Réponses
2
Affichages
2 K
Compte Supprimé 979
C
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…