copier une la formule de la page 1 vers la page 2

**moiberni1966** · 27/01/2018, 11h37

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub test()
Dim i As Integer
 
For i = 2 To 11
 
' cells(ligne,colonne)
 
    Worksheets("feuil2").Cells(i, 1).FormulaLocal = Worksheets("feuil1").Cells(2, i - 1).Formula
Next i
 
 End Sub

Dans la page 1 j' ai une formule : A2 =A4+A5 j' aimerai avoir dans la page 2 dans A2 également A2= A4 (de la page1) + A5 (de la page1) ici il me met dans A2 page2 le résultat de A4 page2 + A5 page 2 . En réalité je veux remettre en A2 page2 exactement la même formule de A2 en page 1

Merci

**Philippe Tulliez** · 27/01/2018, 12h00

Bonjour,
Pour facilité la lecture de ton message, il vaudrais mieux privilégier le mot feuille au lieu de page
Concernant la ligne de code, il vaut mieux utiliser la propriété Formula au lieu FormulaLocal, surtout en Belgique où l'on est confronté à des versions excel de différentes langues au sein d'une même société

Concernant maintenant la question, pour obtenir ce que tu souhaites, il faut préciser dans la cellule A2 de la feuille nommée Feuil1 l'adresse de celle-ci dans la formule comme ci-dessous

Code :

Sélectionner tout - Visualiser dans une fenêtre à part