Macro copier ligne dans autre onglet si condition

Fermé

Viau - 14 juin 2018 à 15:27
Viau - 15 juin 2018 à 08:35

Bonjour,

je suis trés débutante en création de macro, je n'arrive pas même pas à ajouter une condition à la copie d'un ligne :-(
Le but est de copier les cellules de A à D d'un onglet 1 dans les cellules de A à D d'un onglet 2 à condition que la cellule E (onglet 1) = x ou X et l'idéale serait de proposer l'impression de l'onglet 2
Je me suis inspirée de ce forum mais j'ai besoin d'aide.
Si une bonne âme peut m'aider :-)

Sub Macro6()
'
' Macro6 Macro
'

'
Range("A1:B5").Select
Selection.Copy
Sheets("Interresse").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Order").Select
Range("A8:D8").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Interresse").Select
Range("A8").Select
ActiveSheet.Paste
End Sub

A voir également:

Macro copier ligne dans autre onglet si condition respectée
Excel cellule couleur si condition texte - Guide
Dessin sms copier coller zizi ✓ - Forum Réseaux sociaux
Copier une vidéo youtube - Guide
Hors ligne instagram - Guide
Ligne occupée - Forum SFR

2 réponses

Réponse 1 / 2

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
14 juin 2018 à 16:09

Bonjour,

Avec le VBA, il faut absolument éviter d'utiliser .Select

Ton code ci-dessus s'écrit :

Sub Macro6()

  Sheets("Order").Range("A1:B5").Copy Sheets("Interresse").Range("A1")
  Sheets("Order").Range("A8:D8").Copy Sheets("Interresse").Range("A8")

End Sub

Voici un excellent cours VBA gratuit pour débutants :
ftp://ftp-developpez.com/bidou/Cours/VBA/formationVBA.pdf

Viau
14 juin 2018 à 22:49

Merci bcp Patrice,
Je vais regarder le cours mais comme déjà dit je suis très débutante et évidemment j'aurai besoin de cette macro pour lundi...
J'ai dû faire une bétise, ton code ne semble pas marcher, une erreur d'exécution '9' apparait.
Et je ne suis même pas arriver à mettre ma condition... pas facile de débuter :-)

Je pensais que j'y arriverai plus facilement... encore grand merci pour ton aide.

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
14 juin 2018 à 23:13

l'erreur 9 c'est qu'il n'y a pas de feuille nommée Order

Discussions similaires

Copier ligne(s) sous condition dans une autre feuille

boucle copier coller ligne vers une feuille si condition valeur

Boucle copie-colle ligne avec condition de valeur d'une cellule

vba excel copier lignes avec condition

Suppression de ligne sous condition Macros VBA

Masquer une ligne sous conditions

Discussions similaires

Newsletters