bonjour,
j'ai un probleme sur un fichier excel, j'ai un code vba qui recopie les données d'une feuil1 sur une feuil2 à un evênement cela marche mais je voulais que la prochaine fois que je modifie sur feuil1 la cellule a1, que ça modifie a1 sur feuil2 seleument voici le code qui modifie sur toute la boucle
vous remarquerez qu'il ya la colonne 1 et deux sont inverser sur feuil2, c'est un souhait.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Dim i As Integer Application.EnableEvents = False For i = 1 To Sheets("feuil1").Range("a100000").End(xlUp).Row On Error Resume Next If Cells(i).Target.Value <> Sheets("feuil2").Cells(i).Target.Value Then With Sheets("feuil2") .Cells(i, 1) = Sheets("feuil1").Cells(i, 2) .Cells(i, 2) = Sheets("feuil1").Cells(i, 1) .Cells(i, 3) = Sheets("feuil1").Cells(i, 3) .Cells(i, 4) = Sheets("feuil1").Cells(i, 4) .Cells(i, 5) = Sheets("feuil1").Cells(i, 5) End With End If Next
merci d'avance!
Partager