Boucle

j'ai ecrit la macro suivante qui ne fonctionne pas:

Quelqu'un peut-il me dire ce qui ne va pas ? Merci d'avance

Sub FDT()

'

' FDT Macro

'

' Touche de raccourci du clavier: Ctrl+b

'

Range("P8").Select

x = 0

Do Until P8 = "+O8*P7/R[-1]C[+x]"

If "R[-2]C[+x]" = "Total général" Then P8 = "+O8*P7/R[-1]C[+x]" Else P8 = 0

x = x + 1

Loop

End Sub

Bonjour

bernarddelcourt a écrit :

ce qui ne va pas ?

Plus vite fait de dire ce qui va

Il y a un mélange entre formule, variable, références Excel et j'en oublie surement

Un fichier en indiquant ce que tu veux faire serait le mieux pour t'aider

Merci,

y-a-t-il un moyen de joindre un fichier ?

Volia j'ai ajouté le fichier.

en fait le pivot table a une largeur variable et mes formules se font sur la colone total.

Je voudrais donc faire une macro qui refait mes formules chaque fois que la largeur du tableau varie...

Merci

24test-tps.xlsx (20.20 Ko)

Bonjour

A tester

C'est parfait...Merci beaucoup !

Rechercher des sujets similaires à "boucle"