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

Fonction evaluate : erreur type 13

Mattharm

XLDnaute Occasionnel
Bonsoir,

J'essaie de mettre une formule dans une cellule via vba....

Code:
l1 = 3
Cells(2, 10).Value = Evaluate("nb.jours.ouvres(D" + l1 + " ;E " + l1 + ")" + "")

Malheureusement mon incompatibilité de type.... ne me permet pas d'y arriver..

Si quelqu'un à une idée je suis preneur
Merci
Mattharm
 

wilfried_42

XLDnaute Barbatruc
Re : Fonction evaluate : erreur type 13

re:

personnelement, je n'utilise jamais évaluate donc pour te renseigner ca va être dur

je mettrai la formule dans la cellule
Code:
Cells(2, 10).Formulalocal = "=nb.jours.ouvres(D" & l1 & " ;E " & l1 & ")"

Maintenant, nb.jour.ouvres est, si je me rappelle bien, une fonction issue de la librairie Morefunc (que je n'utilise pas non plus).
 

wilfried_42

XLDnaute Barbatruc
Re : Fonction evaluate : erreur type 13

re:

je viens de faire un essai comme ca regarde le fichier, si pas ca, envoie un bout de ton classeur
 

Pièces jointes

  • nbjoursouvres.xls
    20 KB · Affichages: 36
  • nbjoursouvres.xls
    20 KB · Affichages: 34
  • nbjoursouvres.xls
    20 KB · Affichages: 35

Cousinhub

XLDnaute Barbatruc
Re : Fonction evaluate : erreur type 13

Bonsoir,

essaie ainsi :

Code:
Evaluate("NB.JOURS.OUVRES(D" & l1 & ",E" & l1 & ")")

Note, c'est une virgule, et non un point-virgule.....

Bonne soirée
 

Cousinhub

XLDnaute Barbatruc
Re : Fonction evaluate : erreur type 13

Re-

regarde le fichier joint....
 

Pièces jointes

  • mattharm_v1.xls
    18 KB · Affichages: 39
  • mattharm_v1.xls
    18 KB · Affichages: 39
  • mattharm_v1.xls
    18 KB · Affichages: 38

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…