Cloner une feuille Excel
Fermé
st.tex
Messages postés
1
Date d'inscription
mercredi 28 octobre 2015
Statut
Membre
Dernière intervention
28 octobre 2015
-
28 oct. 2015 à 15:05
via55 Messages postés 14512 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 janvier 2025 - 29 oct. 2015 à 00:42
via55 Messages postés 14512 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 janvier 2025 - 29 oct. 2015 à 00:42
A voir également:
- Cloner une feuille Excel
- Cloner disque dur - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Déplacer une colonne excel - Guide
- Calculer une moyenne sur excel - Guide
1 réponse
via55
Messages postés
14512
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
18 janvier 2025
2 741
29 oct. 2015 à 00:42
29 oct. 2015 à 00:42
Bonsoir st.tex
Possible par macro
1) S'il s'agit juste de reporter la modification de la valeur de la cellule (attention certains formats ne seront pas reportés tels quels : 06:00:00 donnera 0,25, 12% donnera 0,12 ..)
2) S'il s'agit de reporter la cellule à l'identique (valeur, format, bordure, remplissage ..)
L'une ou l'autre macro est à placer dans le worksheet de la feuille source :
ALT + F11 pour ouvrir éditeur VBA - double clic sur la feuille source dans l'arborescence à gauche - copier coller la macro dans la page blanche et fermer l'éditeur
Cdlmnt
Via
Possible par macro
1) S'il s'agit juste de reporter la modification de la valeur de la cellule (attention certains formats ne seront pas reportés tels quels : 06:00:00 donnera 0,25, 12% donnera 0,12 ..)
Private Sub Worksheet_Change(ByVal Target As Range) 'Remplacer Feuil2 par le nom de la feuille de recopie s'il est différent Sheets("Feuil2").Cells(Target.Row, Target.Column) = Target.Value End Sub
2) S'il s'agit de reporter la cellule à l'identique (valeur, format, bordure, remplissage ..)
Private Sub Worksheet_Change(ByVal Target As Range) 'Remplacer Feuil1 et Feuil2 par les noms des feuilles de copie et de recopie s'ils sont différents 'ligne et colonne de la cellule modifiée x = Target.Row y = Target.Column 'reselectionne la cellule et la copie ActiveSheet.Cells(x, y).Select Selection.Copy ' desactive le raffraichissement écran (evite de voir passage d'une feuille à l'autre) Application.ScreenUpdating = False 'selectionne la feuille de recopie, la cellule puis colle Sheets("Feuil2").Select Sheets("Feuil2").Cells(x, y).Select ActiveSheet.Paste ' revient sur la 1ere feuille Sheets("Feuil1").Select 'réactive le rafraichissement écran Application.ScreenUpdating = True End Sub
L'une ou l'autre macro est à placer dans le worksheet de la feuille source :
ALT + F11 pour ouvrir éditeur VBA - double clic sur la feuille source dans l'arborescence à gauche - copier coller la macro dans la page blanche et fermer l'éditeur
Cdlmnt
Via