Extraction excel
Résolu
lusitan
Messages postés
6
Statut
Membre
-
lusitan Messages postés 6 Statut Membre -
lusitan Messages postés 6 Statut Membre -
Bonjour,
J avais posé une question concernant un tableur personne ne le connais donc je vais essayer de refaire le meme avec excel mais j ai besoin d aide car je connais pas les macros
sur le tabeur joint j ai besoin de
Quand je saisie le numero de semaine dans la cellule jaune et que j appuie sur le bouton de commande ( qui est est lié a une macro de recopier de la page programme vers la page extraction toutes les cellules de la colonne A qui ont une croix ( ou autre si c est plus facile ) sous le meme numéro de semaine que dans la cellule jaune
pour la mise en forme du planning j ai deja des astuces.
Chaque semaine le nombre de cellules à copier est different donc il faudra effacer tout le contenu avant de coller les nouvelles valeurs
La cellule machine sera collée aussi si elle possede une croix
http://www.cijoint.fr/cjlink.php?file=cj200804/cijd4dReHQ.xls
merci de votre aide
J avais posé une question concernant un tableur personne ne le connais donc je vais essayer de refaire le meme avec excel mais j ai besoin d aide car je connais pas les macros
sur le tabeur joint j ai besoin de
Quand je saisie le numero de semaine dans la cellule jaune et que j appuie sur le bouton de commande ( qui est est lié a une macro de recopier de la page programme vers la page extraction toutes les cellules de la colonne A qui ont une croix ( ou autre si c est plus facile ) sous le meme numéro de semaine que dans la cellule jaune
pour la mise en forme du planning j ai deja des astuces.
Chaque semaine le nombre de cellules à copier est different donc il faudra effacer tout le contenu avant de coller les nouvelles valeurs
La cellule machine sera collée aussi si elle possede une croix
http://www.cijoint.fr/cjlink.php?file=cj200804/cijd4dReHQ.xls
Configuration: Windows XP Internet Explorer 7.0
merci de votre aide
1 réponse
-
bonjour
voici ce que j'ai réalisé à partir de l'enregisteur de macros
j'ai modifié ton tableau de données pour permmettre l'action du filtre (pas de lignes vides intercallées, pas de titre redondant)
Ce code mériterait d'être optimisé pour accélérer le processus
https://www.cjoint.com/?eopVQv4ZzU
à plus-
Bonjour
C est nickel , je l ai récupéré ca marche , j ai juste retiré la copie des x , je vais essayer de modifier la macro de manière a ajouter le filtre et le retirer apres execution , sinon c est tip top
merci beaucoup- bonjour
voici le code qui devrait te convenir :Sub CopyDataSemaine2() Application.ScreenUpdating = False 'initialisation Sheets("extraction").Select Cells.Select Application.CutCopyMode = False Selection.Delete Shift:=xlUp Range("A1").Select Sheets("Programme").Select Range("B4").Select Selection.AutoFilter Semaine = Cells(1, 4).Value Col = Semaine + 1 Selection.AutoFilter Field:=Col, Criteria1:="x" Range("A4:A14").Select Selection.Copy Sheets("extraction").Select Range("A4").Select ActiveSheet.Paste Range("A4").Value = "S" & Semaine Range("B1").Select Sheets("Programme").Select Selection.AutoFilter Range("E2").Select Sheets("extraction").Select Application.ScreenUpdating = True End Sub
à plus
-
