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

Incrémentation en VBA dans une formule

  • Initiateur de la discussion Initiateur de la discussion mael00
  • Date de début Date de début

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 !

M

mael00

Guest
Bonjour à tous,
J'ai un problème dans la programmation en VBA.

En effet, je voudrais incrémenter une formule avec une sélection qui diffère selon une variable (variable).

Voici la partie de code:

a = Range("G2").Value
b = Range("F2").Value
variable = Cells(3 + b, 4)
Cells(3 + a, 9) = "=(1/2*R4C4+SUM(R5C4: variable)+1/2*R[12]C[-5])/R2C6"

Merci de bien vouloir m'aider.
Cordialement.
 
Re : Incrémentation en VBA dans une formule

Merci tototiti2008 pour ta rapide réponse.

C pour étirer la somme mais selon le contenu de la cellule "Cells(3+b,4)"
par exemple le contenu est 12.
 
Re : Incrémentation en VBA dans une formule

Merci tototiti2008. Mais en faite la valeur doit changer. Donc le 12 peu devenir 6 ou ... Donc je voudrais automatiser l'étirement selon le contenu d'une cellule.

Cordialement
 
Re : Incrémentation en VBA dans une formule

Bonjour PierreJean,
Re,

mael00,
Je ne te faisais pas une proposition, je te posais une question...

Bon, en admettant que la réponse à ma question soit OUI, je te propose :

"=(1/2*R4C4+SUM(R5C4:R5C" & variable & ")+1/2*R[12]C[-5])/R2C6"
 
Re : Incrémentation en VBA dans une formule

Merci pour vos répondre.
J'ai essayer le solution proposer mais celle-ci ne fonctionne pas.
je recherche donc toujours une solution.

Cordialement
 
Re : Incrémentation en VBA dans une formule

Re

Effectivement on avait peut-etre oublié le .formula

Vois si tu peux t'inspirer de ces 2 sub

Code:
Sub test()
a = -2
variable = [COLOR=blue]"RC15"
[/COLOR]Cells(3 + a, 9[COLOR=blue]).Formula[/COLOR] = "=(1/2*R4C4+SUM(R5C4:" & variable & ")+1/2*R[12]C[-5])/R2C6"
End Sub
Sub test1()
a = -2
variable = [COLOR=blue]15
[/COLOR]Cells(3 + a, 9).[COLOR=blue]Formula[/COLOR] = "=(1/2*R4C4+SUM(R5C4:[COLOR=blue]RC[/COLOR]" & variable & ")+1/2*R[12]C[-5])/R2C6"
End Sub
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
2
Affichages
775
Réponses
2
Affichages
401
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…