Macro Excel Recherche d'une valeur et copie de ligne

Résolu/Fermé
Fabzo Messages postés 2 Date d'inscription mercredi 13 novembre 2013 Statut Membre Dernière intervention 18 novembre 2013 - 13 nov. 2013 à 13:25
Fabzo Messages postés 2 Date d'inscription mercredi 13 novembre 2013 Statut Membre Dernière intervention 18 novembre 2013 - 18 nov. 2013 à 10:08
Bonjour,

Je souhaite créer une macro qui réaliserai les actions suivantes:

J'ai un fichier Excel avec beaucoup d'onglets.

-Lorsque je lance la macro, celle-ci me demande quelle valeur alphanumérique rechercher.

-Puis la macro recherche cette valeur dans toutes les cellules de tous les onglets.

-Lorsque la valeur est trouvée, la ligne entière contenant cette valeur est recopiée dans un nouveau fichier excel.

Je n'ai jamais programmé de Macro et j'ai seulement quelques notions de programmations générales.

Est-ce que cela est à ma portée?

Merci d'avance pour vos réponses,

Cordialement,

Fabzo
A voir également:

1 réponse

Fabzo Messages postés 2 Date d'inscription mercredi 13 novembre 2013 Statut Membre Dernière intervention 18 novembre 2013
18 nov. 2013 à 10:08
J'ai commencé un bout de code.
J'ai du mal avec la fonction find.

Sub Macro1()

Dim resultat As String

resultat = InputBox("Entrer numéro de LIO :", "Titre") 'La variable reçoit la valeur entrée dans l'InputBox

If resultat <> "" Then 'Si la valeur est différente de "" on affiche le résultat
MsgBox "Le LIO recherché est " & resultat
End If

With Sheets("feuil1")
Set trouve = .Find(resultat, LookIn:=xlValues, LookAt:=xlWhole)
End With


End Sub



Un petit peu d'aide PLEASE!
0