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

Autres Conversion de formule de calcul Excel en VBA

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 !

Papychou56

XLDnaute Nouveau
Bonjour à toutes et tous.

Papy patauge...dès qu'il veut s'attaquer au VBA!

Dans une feuille "Exemple", j'ai un ajout de ligne quand la dernière ligne est remplie: pas de problème, ça fonctionne .

Dans cet ajout de ligne, j'ai une cellule avec une formule de calcul:

=> SI(E11=" "; " ";MOYENNE((E11/G4+((I11/I4+K11/K4)/2))/24;((E11+(I11/I4)+(K11/K4))/G4)/24)).....ça fonctionne parfaitement.

Je souhaiterai l'intégrer dans une formule en VBA, du style:

=> Worksheets("Exemple").Cells(der_ligne, 7).Formula = (formule Excel convertie en VBA)

Et là....je bloque! Avez-vous une idée?

D'avance, merci.

P.S.: je travaille avec Excel 2003.
 
Worksheets("Exemple").Cells(der_ligne, 7).Formula = "=IF(E11="""","""",AVERAGE((E11/G4+((I11/I4+K11/K4)/2))/24,((E11+(I11/I4)+(K11/K4))/G4)/24))"
Bonjour Frangy et merci pour ton travail.
J'ai essayé le code mais il m'indique "Erreur d'exécution'100a': Erreur définie par l'application ou par l'objet"
Je cherche mais je ne vois pas (rien d'étonnant pour un débutant...).
 
Bonjour,
Remplacez SI par IF, MOYENNE par AVERAGE et le séparateur ; par ,
 
Pour avancer, il est souhaitable que tu mettes à disposition un fichier sans données confidentielles et avec le code associé.
Cela permettra de comprendre la cause de cette erreur.

Cordialement.
Merci Frangy et ChRouca.

Ci-joint mon fichier exemple. Le code doit servir à remplir la cellule "E11" et suivantes dans la colonne, avec un format "hh/mm" et s'enregistre lors du renseignement de la feuille "Profils" à l'aide d'une ComboBox (Bouton "Entrer les données".
 

Pièces jointes

Bonjour Frangy.
Un grand merci pour ton travail. C'est exactement ce que je cherchais à faire.
Maintenant, je vais décortiquer le code pour en apprendre un peu plus .
C'est vraiment super d'avoir des gens comme toi pour aider des débutants comme moi.
 
- 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

Réponses
5
Affichages
409
Réponses
4
Affichages
469
Réponses
4
Affichages
721
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…