XL 2019 copier des cellules vers une autre feuilles

toffduq

XLDnaute Occasionnel
bonjour à tous
je cherche à faire un planning excel pour mon travail
je chercher la formule pour copier automatiquement une ligne de cellules vers une autre feuilles par rapport au texte d'une cellule
je m'explique dans la premier feuille j'ai des dossiers que je dois mettre sur plusieurs machines (th1 ; th2 ; th3) et j'aimerai que quand le nomme a machine dans la cellule celle si ce note directement sur la feuille de la machine
merci pour votre aide
 

Pièces jointes

  • essai planning.xlsx
    12.2 KB · Affichages: 11

job75

XLDnaute Barbatruc
Bonjour toffduq, bienvenue sur XLD,

Il suffit de filtrer le tableau source, voyez dans le ThisWorkbook du fichier joint :
VB:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name = "dossier" Then Exit Sub
Application.ScreenUpdating = False
Sh.Cells.Delete 'RAZ
With Sheets("dossier").[B1].CurrentRegion
    .AutoFilter 1, Sh.Name 'filtre automatique
    .Copy Sh.[A1] 'copier-coller
    .AutoFilter 'retire le filtre
End With
Sh.Columns.AutoFit 'ajustement largeurs
End Sub
A+
 

Pièces jointes

  • essai planning(1).xlsm
    23.4 KB · Affichages: 14
Dernière édition:

toffduq

XLDnaute Occasionnel
bonjour job75
Je vous remercie pour votre aide ce que vous avez fait et vraiment ce que je rechercher

Par contre sera-t-il possible d'avoir les explications de la méthode que vous avez utiliser
Car je suis au début de mon projet et j'ai une dizaine de machine à faire.

Merci pour votre aide
 

Discussions similaires

Statistiques des forums

Discussions
311 733
Messages
2 082 010
Membres
101 866
dernier inscrit
XFPRO