XL 2016 copy sur plusieurs feuille

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

litchoutsou

XLDnaute Junior
bonjour a tous aurez vous une solution J'ai dans un tableau sur deux colonnes une liste de données (Noms) en feuille 1 exemple de m6: n65
je dois les recopier sur 70 feuilles, souci si je doit modifier certains noms en feuille 1 il faut que je fasse un copier coller sur les 70 feuilles
Y aurait-il un moyen de rectifier la liste en feuille 1, et que la correction ce fasse automatiquement sur les 70 ou 80 autres feuilles;
je ne sais pas si je me suis bien exprimé
Merci à tous de votre aide, je ne sais pas si je me suis bien exprimé
 
Bonjour Litchoutsou, Fanfan,
En Pj un essai avec :
VB:
Sub Worksheet_Change(ByVal Target As Range)
' Mettre à jour les feuilles à exclure du genre :
' If f.Name <> "Référence" or f.Name <> "Feuill2" or f.Name <> "Feuil3" Then
    On Error GoTo Fin
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("M6:N65")) Is Nothing Then
        tablo = Range("M6:N65")
        For Each f In Worksheets
            If f.Name <> "Référence" Then   ' exclusion de la feuille référence
                Sheets(f.Name).Range("$M$6").Resize(UBound(tablo, 1), UBound(tablo, 2)) = tablo
            End If
        Next f
    End If
Fin:
End Sub
Le tableau est collé sur toutes les feuilles exceptées celles étant dans la liste d'exclusion.
 

Pièces jointes

Bonsoir,
J'ai viré le module Worksheet_Change et mis le mien.
J'ai supposé que la liste n'avait pas à être copiée dans la feuille Orde de sortie, sinon modifiez la macro.
Dans Worksheet_Change il y a une macro Workbook_SheetBeforeDoubleClick avec Sheets("CAMPAGNE").Select, cette sheet n'existe pas.
J'ai invalidé cette macro en la renommant Workbook_SheetBeforeDoubleClickOLD.
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour