Se connecter avec
S'enregistrer | Connectez-vous

Recherche erreur vba

Dernière réponse : dans Programmation

:)  bonjour j'ai besoin d'aide
j'ai une macro qui m'indique une erreur d'incompatibilité de type

en fait j'essai de faire un calcul dont le resultat doit apparaitre a la colonne 12
tout en recuperant dans ma feuille forwards la valeur dont j'ai besoin .
les ligne de ma feuille synthese peuvent varier 


  1. Sub valorisation()
    

  2.  
  3.  
  4.     Dim lignesynthese As Single
    

  5.     Dim prix As Double
    

  6.     lignesynthese = 1
    

  7.     While (Cells(lignesynthese, 1)) = ""
    

  8.       lignesynthese = lignesynthese + 1
    

  9.     Wend
    

  10.     'lançons une boucle pour valoriser
    

  11.     While (Cells(lignesynthese, 1)) <> ""
    

  12.  
  13.           Cells(lignesynthese, 12).Formula = (Cells(lignesynthese, 10) * R2C3 * (1 / (1 + Worksheets("Forwards").Cells(22, 10).Value)))
    

  14.  
  15.      Wend
    

  16.  
  17.  
  18. End Sub

merci de votre aide

Autres pages sur : recherche erreur vba

Lassé par la pub ? Créez un compte
Expert Programmation

Salut,

Sur quelle ligne l'erreur se produit-elle ?

Vire les parenthèses en trop. C'est illisible. Et utilise .Value quand tu t'intéresses à la valeur d'une cellule. tu ne le fais pas ligne 7, 11, 13. Tu le fais ligne 13 ! :/ 

Abandonne les While .. Wend
Utilise des Do While .. Loop à la place.

Dis donc, par quoi doit commencer toute formule en Excel ?
Lassé par la pub ? Créez un compte

Créer un nouveau sujet