XL 2010 Peux-ton recalculer les résultats affichés dans tableau dynamique

[brezak]

Bonjour, je cherche qui peut m'aider pour le pb ci-dessous
Mon TBD présentent des résultats du type:

T1 T2 T3 T4
Ligne A 10 6 12 14 (je souhaite afficher les données divisées par 20 en pourcentage)
Ligne B 4 6 2 8 (je souhaite afficher les données divisées par 30 en pourcentage)

T1 T2 T3 T4
Ligne A 50% 30% 60% 70%
Ligne B 13% 20% 7% 27%

Je vous remercie d'avance pour votre aide

 

[sylvanu]

Bonjour Brezak,
En fait si on entre 10 en A1 ça doit afficher 50%. c'est bien ça ?
Et sans formules. A t-on le droit au VBA ? Sinon ....

 

[brezak]

Enfaite on rentre aucune valeur, elle est affichée dans le tbd, et je souhaite la recalculer les valeurs dans chaque cellule en divisant toute les cellules par un nombre constant. Merci

 

[sylvanu]

Re,
Un essai en PJ.
La macro est facilement adaptable :

Sub Division()
Taille = Application.Max(Range("A1").End(xlToRight).Column, Range("B1").End(xlToRight).Column)
For i = 1 To Taille
    Cells(1, i) = Cells(1, i) / 20
    Cells(2, i) = Cells(2, i) / 30
Next i
Range("1:2").NumberFormat = "0%"
End Sub