Optimisation formule VBA
Momosenpai
Messages postés
24
Statut
Membre
-
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je vais vous presenter un code que je viens de faire (débutant en VBA ) et je voudrais trouver le moyen de l'optimiser (le rendre plus propre)
Auriez vous des suggestions ?
'donnée se trouvant dans sheets(3)
sem1 = WorksheetFunction.Sum(Range(Cells(2, semaine + 1), Cells(2, Dligne)))
sem2 = WorksheetFunction.Sum(Range(Cells(2, semaine + 2), Cells(2, Dligne)))
sem3 = WorksheetFunction.Sum(Range(Cells(2, semaine + 3), Cells(2, Dligne)))
'mettre la valeur de ces données dans des cellules sheets(2)
Sheets(2).Activate
Cells(5, 4).Value = sem1
Cells(5, 5).Value = sem2
Cells(5, 6).Value = sem3
etc ....
Merci d'avance
Je vais vous presenter un code que je viens de faire (débutant en VBA ) et je voudrais trouver le moyen de l'optimiser (le rendre plus propre)
Auriez vous des suggestions ?
'donnée se trouvant dans sheets(3)
sem1 = WorksheetFunction.Sum(Range(Cells(2, semaine + 1), Cells(2, Dligne)))
sem2 = WorksheetFunction.Sum(Range(Cells(2, semaine + 2), Cells(2, Dligne)))
sem3 = WorksheetFunction.Sum(Range(Cells(2, semaine + 3), Cells(2, Dligne)))
'mettre la valeur de ces données dans des cellules sheets(2)
Sheets(2).Activate
Cells(5, 4).Value = sem1
Cells(5, 5).Value = sem2
Cells(5, 6).Value = sem3
etc ....
Merci d'avance
A voir également:
- Optimisation formule VBA
- Optimisation pc - Accueil - Utilitaires
- Formule si et - Guide
- Formule moyenne excel plusieurs colonnes - Guide
- Formule mathématique - Télécharger - Études & Formations
- Optimisation découpe panneau gratuit - Télécharger - Outils professionnels
2 réponses
Bonjour,
Difficile de t'aider avec des variables inconnues comme Dligne: ques aco ?
pourquoi etc à la fin ?
Difficile de t'aider avec des variables inconnues comme Dligne: ques aco ?
pourquoi etc à la fin ?
La syntaxe de cells est
cells(ligne, colonne)
donc pourquoi
Cells(2, Dligne) ?
et si je comprends bien tu peux avoir N colonnes ?
le mieux serait que tu joignes ton classeur
cells(ligne, colonne)
donc pourquoi
Cells(2, Dligne) ?
et si je comprends bien tu peux avoir N colonnes ?
le mieux serait que tu joignes ton classeur
pour joindre une pièce
mettre le classeur sans données confidentielles en pièce jointe sur
http://cjoint.com/
puis copier l'adresse du lien et la coller dans le message de réponse
Dligne c'est la dernière ligne que j'ai déjà identifié.
Semaine est une variable qui est connue aussi .
Ce que je cherche c'est un moyen de mettre une boucle qui pourra me faire la somme de données se trouvant dans la 3eme feuille et les mettres dans la 2eme feuille. ( pour le etc )
merci