Macro Copier Coller Résolu

Question

Bonjour, 
Tout d'abord, je vous remercie pour le temps que vous accorderez à ma question. Après avoir suivi plusieurs tuto / et des dizaines (voir centaines) de recherches google, je m'en remet à vous. Je n'ai presque jamais fais de macro, et je pense malheureusement que celle-ci n'est pas dans mes compétences, mais toutes pistes me permettant de progresser est la bienvenue !

Pour le contexte:

J'ai un classeur avec environ 10 feuilles (ex: Projet ; Logistique 1; Logistique 2) correspondant à des secteurs de mon entreprise.
Dans chaque feuille se trouve un tableau qui renseigne les actions à faire (en ligne) avec différentes colonnes (pilote; détection; délai; soldée)
J'ai donc une colonne "soldée" en P14 qui est remplis par une date lorsque l'action située sur la même ligne est soldée. 

2 Solutions à mon problème:

1ère solution 

Je souhaiterai réaliser une macro bouton dans une feuille "actions_soldées" qui réalise les actions suivantes:

_Recherche les cellules complétées dans la colonne P (a partir de P14) de la feuille "Projet"
_Lorsque la cellules est différentes "de rien", faire un copier de la ligne et coller celle ci dans la feuille "actions_soldées" et les mettre les une après les autres à partir de la ligne 14
_Puis passer à la feuille "Logistique 1" et répéter l'opération (sans supprimer les autres), puis passer à la feuille "Logistique 2" et répéter l'opération.
_Enfin supprimer les doublons en cas de création de lignes identiques.

2ème solution

Une autre solution serait:
Lorsque l'on rentre une donnée dans la colonne soldée d'une feuille, la ligne se copie automatiquement dans la feuille "actions_soldée", et ceux les unes à la suite des autres (sans effacer de ligne et en évitant les doublons)

Je suis conscient que les forums ne sont pas des lieux de dépannage informatique, mais je pars du principe que plus le contexte est clair, plus la réponse sera précise.

Merci pour l'attention !



Configuration: Windows / Firefox 36.0

Millaï · Answer

Vous avez quel version de Excel ?
Insérez un bouton sur votre feuille "actions_soldée" et affecter lui une nouvelle macro.

Entrez ce code


Sub Bouton1_Cliquer()
Dim j, i, h As Integer

For i = 14 To 114
   If Sheets("Logistique 1").Cells(i, 16) <> "" Then
      j = 14
      h = 0
      While Cells(j, 1) <> "" And h = 0
         If Cells(j, 1) = Sheets("Logistique 1").Cells(i, 16) Then
            h = 1
         End If
         j = j + 1
      Wend
      If h = False Then
         Cells(j, 1) = Sheets("Logistique 1").Cells(i, 16)
      End If
   End If
Next
End Sub

Normalement sa devrait fonctionner juste pour la page Logistique 1 dite moi si cela correspond déjà.

Millaï · Answer

J'ai fais quelque manipulation car je n'avais pas tout compris, pour l'instant cela fonctionne uniquement pour la feuille "Projet", dite moi si cela correspond.

Il y a une seul page Logistique, va-t-il y en avoir encore ?

Je vous envoie le lien en mp

Macro Copier Coller

2 réponses

Discussions similaires

Newsletters