Bonjour à tous,
étant novice dans les profondeurs d'excel, je viens vers vous car j'ai créé un classeur avec douze feuille (une par mois). Il s'agit d'un tableau avec plusieurs colonnes (heure travailler, reliquat d'heure, km,...) J'ai réussi à trouver un code pour copier certaine partis identique à toutes les feuilles.
J'ai essayé de me servir de ce code pour copier le résultat d'une colonne sur une colonne différente d'une autre feuille. Mais sans succès. Je peux également vous transmettre mon classeur. ça fait plusieurs jours que je cherche une solution mais il en existe tellement des façon de copier que je m'y perd.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Private Sub Worksheet_Change(ByVal Target As Range) Sheets("Février").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Mars").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Avril").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Mai").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Juin").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Juillet").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Août").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Septembre").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Octobre").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Novembre").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value Sheets("Décembre").Range("A8:C100").Value = Sheets("Janvier").Range("A8:C100").Value End Sub
Merci par avance.
Partager