rss
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Non résolu

Vba excel - problème d'appel à procédure

Posté par Le_Suédois, le mardi 12 septembre 2006 à 15:23:19
Bonjour à tous,

On m'a demandé de faire un programme en excel, et je rencontre un problème d'appel à procédure. Je voudrais que, lors du remplissage d'un cellule (A) par un pourcentage, une autre cellule (B), dans laquelle je ne peux insérer aucune formule, s'incrémente de ce pourcentage. Pour cela, j'ai créé un fonction vba qui arrive bien à incrémenter le nombre, mais je n'arrive pas à remplir la case B dynamiquement. Pour cela, je voulais appeler une procédure sub dans ma fonction, mais malheureusement cela ne fonctionne pas. Quelqu'un saurait-il comment faire, ou aurait une autre solution pour remplir cette case?
Merci pour vos réponses

Pour info voici mon code :

Function incrementePrix(prix As Single, pourcent As Single)
plus = prix * pourcent / 100
prix = prix + plus
incrementePrix = prix
Call ecrire(prix)
End Function

Sub ecrire(prix As Single)
Sheets("Qwddf").Range("I70").FormulaR1C1­ = prix
End Sub
Répondre à Le_Suédois  Signaler ce message aux modérateurs Aller au dernier message

1


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
JvDo, le mercredi 13 septembre 2006 à 00:45:29
Bonsoir,

tu peux utiliser une procédure évènementielle derrière la feuille où tu saisis le pourcentage :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("b9").Address Then
    [feuil2!I70] = (Target + 1) * [prix]
End If
End Sub
dans l'exemple, "prix" est un nom, laprocédure ne travaille que si c'est la cellule "B9" qui change (ce qui n'est pas terrible vu que si le prix change, la cellule I70 ne change pas!)

cordialement
Répondre à JvDo

2


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
 LeSuédois68, le mercredi 13 septembre 2006 à 19:59:45
C'est ce qu'il me fallait! Merci JvDo!
Répondre à LeSuédois68
Logiciels pertinents trouvés dans les téléchargements
Télécharger Excel Viewer 2003Excel Viewer - Avec Microsoft Office Excel Viewer 2003, vous pouvez ouvrir, afficher et imprimer des classeurs Excel (fichiers XLS ), même...Catégorie: Tableur
Licence: Freeware/gratuit
Télécharger GANTT Project 2.0.7GANTT Project - GanttProject est un outil de gestion de projet libre, permettant de réaliser des diagrammes de GANTT afin de planifier un...Catégorie: Gestion de projet
Licence: Open Source
Télécharger OpenOffice.org 2.4.1OpenOffice.org - OpenOffice est une suite bureautique complète entièrement gratuite, compatible avec la suite Microsoft Office. Elle...Catégorie: Suite bureautique
Licence: Open Source
Télécharger PSPad 4.5.2PSPad - PSPad est un excellent éditeur de texte. Il est utile pour travailler sur du simple texte, mais aussi sur du HTML, CSS,...Catégorie: Développement
Licence: Freeware/gratuit
Plus de logiciels gratuits sur « vba excel problème d'appel à procédure »