Bonjour,
voilà mon problème j'ai crée un Userform qui me permet de copier/coller toutes les colonnes est sa fonctionné; mais mon problème c'est que maintenant je veux copier un numéros spécifique :
par exemple si dans mon Userform si je tape 201 il me recopie toute les colonnes concordant à ce chiffre.
voilà en pièce jointe mon fichier
les feuilles concerné sont la feuille Appelant (de la colonne A à E) qui est la feuille Source et la FeuilleAppelant détaillé (c sur cette feuille ou seront copier les donnée du 201 par exemple) qui est la feuille Cible
Voila mon programme VBA qui me permet de tous copier
Sub Appelant()
Range("A1:A526,B1:B526,C1:C526, D1526").Select
Selection.Copy
Workbooks("finalstatéléphonique.xls").Sheets("Appelant").Activate 'j'active le classeur et la feuille de "reception"
Range("A1").Select
ActiveSheet.Paste 'je col
Range("A1").Select 'je selectionne la cel A1
End Sub
Merci de m'aider
P.S: SVP aidez moi
voilà mon problème j'ai crée un Userform qui me permet de copier/coller toutes les colonnes est sa fonctionné; mais mon problème c'est que maintenant je veux copier un numéros spécifique :
par exemple si dans mon Userform si je tape 201 il me recopie toute les colonnes concordant à ce chiffre.
voilà en pièce jointe mon fichier
les feuilles concerné sont la feuille Appelant (de la colonne A à E) qui est la feuille Source et la FeuilleAppelant détaillé (c sur cette feuille ou seront copier les donnée du 201 par exemple) qui est la feuille Cible
Voila mon programme VBA qui me permet de tous copier
Sub Appelant()
Range("A1:A526,B1:B526,C1:C526, D1526").Select
Selection.Copy
Workbooks("finalstatéléphonique.xls").Sheets("Appelant").Activate 'j'active le classeur et la feuille de "reception"
Range("A1").Select
ActiveSheet.Paste 'je col
Range("A1").Select 'je selectionne la cel A1
End Sub
Merci de m'aider
P.S: SVP aidez moi