Find, aucun résultat trouvé
juju77
-
juju77 -
juju77 -
Bonjour,
Je voudrais que si la valeur recherché n'est pas trouvé alors une message box apparaît et indique aucun résultat, merci d'avance
code :
Private Sub ModifierDonnées_Click()
Recherche = Range("A2:A999").Find(NomLivreBox.Value).Row
Cells(Recherche, 1) = NomLivreModifiéBox.Value
Cells(Recherche, 2) = NomAuteurModifiéBox.Value
Cells(Recherche, 3) = RésuméModifiéBox.Value
Cells(Recherche, 4) = GenreModifierListBox.Value
End Sub
Je voudrais que si la valeur recherché n'est pas trouvé alors une message box apparaît et indique aucun résultat, merci d'avance
code :
Private Sub ModifierDonnées_Click()
Recherche = Range("A2:A999").Find(NomLivreBox.Value).Row
Cells(Recherche, 1) = NomLivreModifiéBox.Value
Cells(Recherche, 2) = NomAuteurModifiéBox.Value
Cells(Recherche, 3) = RésuméModifiéBox.Value
Cells(Recherche, 4) = GenreModifierListBox.Value
End Sub
A voir également:
- Find, aucun résultat trouvé
- Resultat foot - Télécharger - Vie quotidienne
- Find and mount - Télécharger - Récupération de données
- Ou se trouve le presse papier - Guide
- Pourquoi ma tv ne trouve pas toutes les chaînes - Guide
- Lexer resultat - Télécharger - Sport
