L’outil de recherche, aller un peu plus loin

A partir des dernières versions d'Excel, l'outil de recherche, accessible par la combinaison CTRL + F (F pour find qui veut dire recherche en Anglais) permet plusieurs options intéressantes :

- Pour y accéder, cliquez sur le bouton Options>>.

- Vous pourrez alors recherchez sur la feuille, mais aussi sur l'ensemble du classeur (premier menu déroulant.
- Vous pouvez aussi choisir de respecter la casse (majuscule ou minuscule).
- Vous pouvez chercher la totalité du contenu de la cellule.

- Une des options les plus intéressantes est le bouton "Rechercher tout" qui permet d'afficher l'ensemble des endroits où se trouvent ce qu'on recherche. On peut ainsi naviguer très rapidement dans le classeur à la recherche de la bonne formule; il suffit pour cela de cliquer sur un des résultats de la recherche.

Rechercher dans l'ensemble du classeur

Finalement, vous pouvez aussi faire une recherche par format, ce qui peut s'avérer intéressant si vous utilisez beaucoup de format, par exemple, en associant une signification précise à une certaine couleur. Ainsi, dans certaines applications, on peut décider de mettre en jaune clair toutes les cellules devant être saisies, ou encore, mettre en grisé foncé toutes les cellules contenant des formules ne devant pas être effacées.

Donc, cette fonction peut s'avérer très pratique dans bon nombre de cas.

Bon apprentissage

Gaetan

Compter le nombre de fois qu’un mot est présent dans un classeur

Suite à la question d'une lectrice, voici un début de solution en vba à cette question, en vidéo et plus bas avec le texte (cliquer ici pour le fichier).

On va donc scanner l'ensemble des feuilles, puis des cellules de chaque feuille.
Pour chaque cellule, on va ensuite rechercher la présence de la chaine de caractère (le mot) et comptabiliser cette présence.

On met ceci dans une fonction, pour pouvoir l'utiliser facilement par la suite, par exemple si on veut faire des statistiques à partir d'une liste de mots à chercher.

Ca donne donc ceci.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Sub recherche()
    MsgBox "Ce mot apparaît " & compte_occurence_mot(InputBox("Que recherchez vous ?", "Occurence")) & " fois."
End Sub
Function compte_occurence_mot(mot_que_l_on_recherche As String)
    Dim sh As Worksheet
    Dim cellule As Range
    Dim t As Integer
    Dim longueur_du_mot_que_l_on_cherche As Integer
    longueur_du_mot_que_l_on_cherche = Len(mot_que_l_on_recherche)
    'on scanne toutes les feuilles
    For Each sh In ThisWorkbook.Worksheets
        'On scanne toutes les cellules de la plage utilisé de la feuille
        For Each cellule In sh.UsedRange
            'On scanne toutes les lettres de la cellule
            If Not (IsError(cellule.Value)) Then
                For t = 1 To Len(cellule.Value)
                    'Si on trouve le mot recherché, on incrémente l'occurence
                    If Mid(cellule.Value, t, longueur_du_mot_que_l_on_cherche) = mot_que_l_on_recherche Then
                        compte_occurence_mot = compte_occurence_mot + 1
                    End If
            Next t
                End If
        Next cellule
    Next sh
End Function

Note : en utilisant la fonction application.find, on doit aussi y arriver, ca fera l'objet d'un prochain post
Note 2 : à la place de faire une recherche par cellule, on peut aussi créer un tableau en VBA (array), ce qui évite de devoir lire chaque cellule et donc on accélère la vitesse de la macro, là encore, ce sera pour une autre fois 😉

Si vous voyez d'autres manières d'améliorer ce code, n'hésitez pas !

A bientôt

Gaëtan

Rétablir le vérificateur de compatibilité

Bonjour,

Si vous travaillez sur excel 2007 et que vous continuez d'enregistrer vos fichier en format .xls pour des raisons de compatibilité avec d'autres utilisateurs, vous voyez souvent apparaître la boîte de dialogue suivante :

Verificateur de compatibilite

Vous pouvez supprimer cette boite de dialogue de deux manières (à ma connaissance) :
- modifier le fichier pour que les fonctionnalités purement 2007 ne s'y retrouvent plus;
- ou bien décocher la case "Vérifier la compatibilité lors de l'enregistrement de ce classeur".

Dans ce dernier cas, la seule solution (mais il doit surement y en avoir d'autres) pour rétablir cette case à cocher par la suite, consiste à enregistrer le fichier en xlsm (pas en xlsx si votre fichier contient des macros) et ensuite de le réenregistrer en .xls.

Si vous connaissez un autre moyen, je serai ravi de le connaître !

A bientôt

Gaetan