Macro de recherche qui affiche les pages trouvées
Résolu/Fermé
A voir également:
- Macro de recherche qui affiche les pages trouvées
- Ce programme est écrit en python. il construit un mot secret dans une variable mais il ne l'affiche pas. modifiez-le pour qu'il affiche le mot secret. exécutez-le. quel est ce mot secret ? ✓ - Forum Python
- Recherche par image - Guide
- Recherche musique - Guide
- Consultez le code source de cette page. copiez la ligne indiquant aux moteurs de recherche de ne pas référencer la page. ✓ - Forum Référencement
- Macro logiciel - Télécharger - Organisation
1 réponse
via55
Messages postés
14031
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
27 janvier 2023
2 548
Modifié par via55 le 4/11/2013 à 12:53
Modifié par via55 le 4/11/2013 à 12:53
Bonjour
La recherche s'arrête dès la première valeur trouvée (Exit Sub)
donc remplacer le Exist Sub par un message :
Msgbox("xxx") 'remplacer les xxx par le message à afficher dans la fenêtre
La recherche reprendra après avoir cliqué sur OK
De plus il ya un oubli dans le code :
pour se positionner sur la cellule trouvée il faut remplacer .Range(a).Select par ActiveSheet.Range(a).Select
Cdlmnt
"L'imagination est plus importante que le savoir." A. Einstein
La recherche s'arrête dès la première valeur trouvée (Exit Sub)
donc remplacer le Exist Sub par un message :
Msgbox("xxx") 'remplacer les xxx par le message à afficher dans la fenêtre
La recherche reprendra après avoir cliqué sur OK
De plus il ya un oubli dans le code :
pour se positionner sur la cellule trouvée il faut remplacer .Range(a).Select par ActiveSheet.Range(a).Select
Cdlmnt
"L'imagination est plus importante que le savoir." A. Einstein
4 nov. 2013 à 15:36