Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Rehercher et remplacer

4 réponses
Avatar
Tatanka
Bonjour,

Une amie me demande s'il existe un moyen de mettre en
surbrillance les cellules trouvées par la boîte de dialogue
« Rechercher ». En tous cas, un truc permettant de répérer
plus facilement la cellule trouvée.
Moi je ne connais pas. Et vous ?

Serge

4 réponses

Avatar
michdenis
Bonjour,

Si tu utilises la commande graphique de la feuille de calcul,
c'est impossible, car c'est Excel qui gère cette commande et
il n'y a pas un moyen SIMPLE de "modifier" son exécution.

Mais en VBA, tout est possible. Tu as un exemple dans l'aide d'Excel
sur Find... FindNext

'-----------------------------------
With Worksheets(1).Range("a1:a500")
Set c = .Find(2, lookin:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
'Pour chaque cellule trouvée, un fond de cellule rouge
'Tu remplaces ceci par ce que tu désires
c.Interior.ColorIndex = 3
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
'-----------------------------------

De même, on peut formater seulement le mot de la cellule recherchée.
Cela dépend de la donnée du problème et du résultat attendu.




"Tatanka" a écrit dans le message de groupe de discussion :
#$
Bonjour,

Une amie me demande s'il existe un moyen de mettre en
surbrillance les cellules trouvées par la boîte de dialogue
« Rechercher ». En tous cas, un truc permettant de répérer
plus facilement la cellule trouvée.
Moi je ne connais pas. Et vous ?

Serge
Avatar
michdenis
Pour moduler cette réponse,

En utilisant la fenêtre de la commande "Remplacer / Rechercher"
en affichant les options, il est possible de modifier le format
de la cellule où il y a eu un remplacement d'effectuer.
En utilisant le bouton "Format" au bout de la ligne "Remplacer"
de la fenêtre "Rechercher / Remplacer", on peut employer toutes
les options disponibles pour ce faire...

Par programmation, on peut-être plus pointu dans le type de format
à appliquer !

J'espère que cela dissipe toute confusion qu'aurait pu susciter ma
réponse.



"michdenis" a écrit dans le message de groupe de discussion :
#
Bonjour,

Si tu utilises la commande graphique de la feuille de calcul,
c'est impossible, car c'est Excel qui gère cette commande et
il n'y a pas un moyen SIMPLE de "modifier" son exécution.

Mais en VBA, tout est possible. Tu as un exemple dans l'aide d'Excel
sur Find... FindNext

'-----------------------------------
With Worksheets(1).Range("a1:a500")
Set c = .Find(2, lookin:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
'Pour chaque cellule trouvée, un fond de cellule rouge
'Tu remplaces ceci par ce que tu désires
c.Interior.ColorIndex = 3
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
'-----------------------------------

De même, on peut formater seulement le mot de la cellule recherchée.
Cela dépend de la donnée du problème et du résultat attendu.




"Tatanka" a écrit dans le message de groupe de discussion :
#$
Bonjour,

Une amie me demande s'il existe un moyen de mettre en
surbrillance les cellules trouvées par la boîte de dialogue
« Rechercher ». En tous cas, un truc permettant de répérer
plus facilement la cellule trouvée.
Moi je ne connais pas. Et vous ?

Serge
Avatar
Tatanka
Aucune confusion dans ta réponse et quand je saurai précisément
les besoins de mon amie, je choisirai la solution qui s'impose.

Bonne fin de semaine


"michdenis" a écrit dans le message de news:
Pour moduler cette réponse,

En utilisant la fenêtre de la commande "Remplacer / Rechercher"
en affichant les options, il est possible de modifier le format
de la cellule où il y a eu un remplacement d'effectuer.
En utilisant le bouton "Format" au bout de la ligne "Remplacer"
de la fenêtre "Rechercher / Remplacer", on peut employer toutes
les options disponibles pour ce faire...

Par programmation, on peut-être plus pointu dans le type de format
à appliquer !

J'espère que cela dissipe toute confusion qu'aurait pu susciter ma
réponse.



"michdenis" a écrit dans le message de groupe de discussion :
#
Bonjour,

Si tu utilises la commande graphique de la feuille de calcul,
c'est impossible, car c'est Excel qui gère cette commande et
il n'y a pas un moyen SIMPLE de "modifier" son exécution.

Mais en VBA, tout est possible. Tu as un exemple dans l'aide d'Excel
sur Find... FindNext

'-----------------------------------
With Worksheets(1).Range("a1:a500")
Set c = .Find(2, lookin:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
'Pour chaque cellule trouvée, un fond de cellule rouge
'Tu remplaces ceci par ce que tu désires
c.Interior.ColorIndex = 3
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
'-----------------------------------

De même, on peut formater seulement le mot de la cellule recherchée.
Cela dépend de la donnée du problème et du résultat attendu.




"Tatanka" a écrit dans le message de groupe de discussion :
#$
Bonjour,

Une amie me demande s'il existe un moyen de mettre en
surbrillance les cellules trouvées par la boîte de dialogue
« Rechercher ». En tous cas, un truc permettant de répérer
plus facilement la cellule trouvée.
Moi je ne connais pas. Et vous ?

Serge



Avatar
Philippe.R
Bonsoir,
Fort intéressant !
Je n'avais encore jamais regardé de ce côté
Merci
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"michdenis" a écrit dans le message de
news:
Pour moduler cette réponse,

En utilisant la fenêtre de la commande "Remplacer / Rechercher"
en affichant les options, il est possible de modifier le format
de la cellule où il y a eu un remplacement d'effectuer.
En utilisant le bouton "Format" au bout de la ligne "Remplacer"
de la fenêtre "Rechercher / Remplacer", on peut employer toutes
les options disponibles pour ce faire...

Par programmation, on peut-être plus pointu dans le type de format
à appliquer !

J'espère que cela dissipe toute confusion qu'aurait pu susciter ma
réponse.



"michdenis" a écrit dans le message de groupe de
discussion :
#
Bonjour,

Si tu utilises la commande graphique de la feuille de calcul,
c'est impossible, car c'est Excel qui gère cette commande et
il n'y a pas un moyen SIMPLE de "modifier" son exécution.

Mais en VBA, tout est possible. Tu as un exemple dans l'aide d'Excel
sur Find... FindNext

'-----------------------------------
With Worksheets(1).Range("a1:a500")
Set c = .Find(2, lookin:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
'Pour chaque cellule trouvée, un fond de cellule rouge
'Tu remplaces ceci par ce que tu désires
c.Interior.ColorIndex = 3
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
'-----------------------------------

De même, on peut formater seulement le mot de la cellule recherchée.
Cela dépend de la donnée du problème et du résultat attendu.




"Tatanka" a écrit dans le message de groupe
de discussion :
#$
Bonjour,

Une amie me demande s'il existe un moyen de mettre en
surbrillance les cellules trouvées par la boîte de dialogue
« Rechercher ». En tous cas, un truc permettant de répérer
plus facilement la cellule trouvée.
Moi je ne connais pas. Et vous ?

Serge