Effectuer une recherche en vba dans plusieurs feuilles
Résolu/Fermé
brassières
Messages postés
1
Date d'inscription
dimanche 20 janvier 2013
Statut
Membre
Dernière intervention
20 janvier 2013
-
20 janv. 2013 à 12:42
brassières - 25 févr. 2013 à 19:22
brassières - 25 févr. 2013 à 19:22
A voir également:
- Recherche de données dans plusieurs feuilles excel vba
- Liste déroulante excel - Guide
- Formule excel - Guide
- Recherche musique - Guide
- Fusionner plusieurs feuilles excel en une seule - Guide
- Feuille de pointage excel - Télécharger - Tableur
2 réponses
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 744
24 janv. 2013 à 11:13
24 janv. 2013 à 11:13
Bonjour,
Pour supprimer, dans la feuille "BaseDeDonnées", la ligne qui contient en colonne B le mot saisi en E5 de ma feuille "Formulaire", essaie ce code :
Pour supprimer, dans la feuille "BaseDeDonnées", la ligne qui contient en colonne B le mot saisi en E5 de ma feuille "Formulaire", essaie ce code :
Sub ElimineLigne() Dim Trouve As Range Dim Valeur_cherchee As String With Sheets("Formulaire") Valeur_cherchee = .Range("E5").Value End With With Sheets("BaseDeDonnées") Set Trouve = .Columns(2).Cells.Find(what:=Valeur_cherchee) If Trouve Is Nothing Then MsgBox "Pas trouvé " & Trouve & " en colonne B de la feuille BaseDeDonnées" Else .Rows(Trouve.Row).Delete End If Set Trouve = Nothing End With End Sub