Transfert
Bonjour,
Mon but est de concevoir un programme permettant de copier une ligne au complet d'une feuille2 a une autre feuille, si la ligne en question ne contient pas dans la colonne E "oui" ou "non" et le numéro du client est déjà existant (mentionner dans la colonne 2)
nb: La deuziéme condition si elle n'est pas vérifier coiper quand même
pour ce faire je pensé que ça va être facile mais ça bloque
Sub upload()
Set wsrm = Workbooks("mes plans.xlsm").Worksheets("feuil1")
Set wsmv = Workbooks("mes plans.xlsm").Worksheets("feuil2")
dlmv = wsmv.Range("A" & Rows.Count).End(xlUp).Row
dlrm = wsrm.Range("A" & Rows.Count).End(xlUp).Row
For i = 2 To dlmv
Set rrm = wsrm.Range("B2:B" & dlrm).Find(wsmv.Cells(i, 2))
If rrm Is Nothing Then
dlrm = dlrm + 1
wsmv.Rows(i).Copy wsrm.Range("A" & dlrm)
Else
If wsrm.Cells(i, 5) = "oui" Or Cells(i, 5) = "non" Then wsmv.Cells(i, 5).front.Color = 10 Else wsmv.Rows(i).Copy wsrm.Range("A" & dlrm)
Next i
End If
End Sub
En attendant vos retour
je vous remercie d'avance
Bonjour,
Bonsoir
Le but étant de vérifier si la colonne 5 contient "Oui" ou "non" dans la feuille 1 => pas la peine de copier la ligne, et dans le cas contraire copier la ligne complète de la feuille 2 à feuille 1
additivement à ma premier question, je veux savoir comment programmer lorsque la feuille "TR spécial" contient des lignes mettre sur la ligne correspondante (si le même numéro de série) "Feuille 1" dans la colonne statut "NON"
Pourriez vous m'aider
Merci beaucoup d'avance
Ps: j'ai conçue un petit fichier pour vous clarifier ma demande
voici le fichier
Pouvez me donner suite je vous en prie a ma demande
Merci beaucoup à vous
Bonsoir tout le monde
depuis ce matin et j’essaie de trouver une solution
Please, pourriez vous me corriger mon programme
Merci d'avance
Bonjour
A vérifier pour la première demande
Pour la seconde demande il faut que tu fasses des exemples de résultats souhaités en indiquant pourquoi
BANZAI
je te remercie infiniment vous me sauvez
je vous souhaite tout le bonheur
BANZAI64, je viens de m'appercevoir que le programme que vous avez fait copie sur la feuil2
par contre moi je veux le contraire un transfert de la feuill2 à la feuil1 si la colonne E ne contient ni "oui ni "non"
Dans le cas contraire => ne pas copier a.e. laisser la ligne de la feuil1 comme elle est
Merci de me donner suite
Bonjour
Je me suis mélangé les yeux
A vérifier si je les ai remis dans l'ordre