voila j'ai une macro, tirage des formules, et elle marche ça d'accord...
L'ennui c'est que si je rajoute une ligne ou une colonne ça marche plus...
Donc il me faudrait une test de fin de fichier en colonne et en ligne, mais je vois pas comment je fais ça...

voici mon code actuel:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
'Tirer les formules'
Dim NumCol, Derligne As Integer
Derligne = 565
derniereligne = Derligne + 1
For NumCol = 36 To 256
   'Balaie chaque cellule de la ligne 20 pour chaque colonne'
   If Left(Cells(20, NumCol).Formula, 1) = "=" Then
        Range(Cells(20, NumCol), Cells(derniereligne, NumCol)).FillDown
   End If
Next NumCol