Solveur Boucle VBA plusieurs variables incrémentées Fermé

Question

Rebonjour! 

J'ai encore un petit (et dernier...) problème :s 
J'ai donc réussi grâce au forum et à ériiic, à créer une incrémentation en colonne : 
 For K = 0 To 30
SolverOk SetCell:=Cells(16, 14 + K), MaxMinVal:=2, ByChange:=Cells(14, 13 + K)

Problème 1 :  Je n'arrive pas à mettre plusieurs variables en utilisant "cells" contrairement à "range" 
Ex: ByChange:=Cells(14, 13),(14, 14) ne fonctionne pas 

Problème 2 : Je n'arrive pas à faire SolverDelete avec la fonction "cells" 
Ex:     SolverAdd CellRef:=Cells(13, 14 + K), Relation:=1, FormulaText:=Cells(31, 14 + K) 
    SolverDelete CellRef:=Cells(13, 14 + K), Relation:=1, FormulaText:=Cells(31, 14 + K) ne fonctionne pas non plus 

Merci pour votre aide

Valoche01 · Answer

J'ai finalement réussi à mettre plusieurs cellules variables comme ceci : 
ByChange:=Range(Cells(2, 2 + K), Cells(4, 2 + K))

L'incrémentation se fait bien

Par contre je n'arrive toujours pas à faire les solverdelete

Si vous avez une idée, merci !

Solveur Boucle VBA plusieurs variables incrémentées

1 réponse

Discussions similaires