Voici comment vous associez un facteur à chaque formule
Si vous modifiez globalement les données de vos tableaux, vous pouvez effectuer des augmentations ou des diminutions de prix ou d'autres ajustements de calcul à la vitesse de l'éclair.
Vous pouvez ajouter un facteur à toutes les formules de vos listes. Une macro résout cette tâche et attache un facteur de multiplication à toutes les formules dans une zone de données sélectionnée. De cette façon, vous pouvez adapter rapidement et efficacement les listes de prix et autres aux nouvelles conditions.
La figure suivante montre un tel tableau. Il y a des constantes dans les cellules B1 : B3 et une formule dans la cellule B4. La cellule de formule fait référence aux cellules avec les constantes.
Pour ajouter le facteur 110 % à toutes les formules de cette liste, marquez d'abord la zone de données B1 : A4, puis appelez la macro suivante :
Sous-facteurAnFormelnAnhaengen ()
Dim Cell As Range
Facteur de gradation As String
Facteur = "110%"
Pour chaque cellule de la sélection
Avec cellule
Si .HasFormula Then .Formula = _
"= (" & Right $ (. Formula, Len (.Formula) - 1) & ") *" & factor
Terminer par
Cellule suivante
Fin du sous-marin
Après le démarrage de la macro, toutes les cellules de formule dans la zone de cellule marquée sont multipliées par un facteur de 110 %. La figure suivante montre le résultat
La macro insère le facteur que vous avez spécifié dans l'affectation de valeur pour la variable facteur ont défini. L'expression "110%" y est stockée sous forme de texte. Cela conduit à une augmentation des résultats de la formule de 10 %. Changez ce nombre pour un facteur différent. En utilisant des facteurs inférieurs à 1, vous pouvez également faire des divisions.
Dans le SiLigne de la macro, le texte de la formule existante est placé entre parenthèses, puis un facteur de multiplication est ajouté après celui-ci.
Bien sûr, vous pouvez également utiliser la macro sur toutes les cellules d'un tableau. Pour ce faire, sélectionnez toutes les cellules du tableau à l'aide de la combinaison de touches CTRL A avant d'appeler la macro.
