Copier automatiquement avec macro

Fermé
amandine.amara Messages postés 5 Date d'inscription lundi 21 janvier 2019 Statut Membre Dernière intervention 22 janvier 2019 - Modifié le 22 janv. 2019 à 09:21
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 - 22 janv. 2019 à 09:45
Bonjour, alors je souhaite copier automatiquement plusieurs tableaux dans des feuilles excel selon le résultat d'une cellule.
J'ai testé avec une macro mais cela ne fonctionne pas.
Voici le code:
If Range("c5").Value = "aerzen-MSB7" Then
Sheets("aerzen-MSB7").Select
Columns("A:M").Select
Selection.Copy
Sheets("Feuil4").Select
Range("D4").Select
ActiveSheet.Paste


If Range("c5").Value = "adicomp-renner" Then
Sheets("Adicomp-renner").Select
Columns("A:M").Select
Selection.Copy
Sheets("Feuil4").Select
Range("D4").Select
ActiveSheet.Paste



End If
End If

End Sub
A voir également:

1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 729
22 janv. 2019 à 09:45
Bonjour,

Tu n'as pas suivi les recommandations données ici:

https://forums.commentcamarche.net/forum/affich-35819842-probleme-avec-fonction-si-dans-macro

0