compteur sur plusieurs fichier et plusieurs onglets

Question

Et oui encore moi

Je cherche des commandes qui pourront me permettre de lanc&#233; une recherche. Sur plusieurs fichiers et sous plusieurs onglet de excel. il faudrait k'il me compte le nombre de fois qu'apparait un mot. 

Au fait les fichiers excel sont dans le meme repertoire. 
Faudrait aussi que je sorte les r&#233;sultats sur un autre fichier ( celui qui contient la macro)

jpleroisse · Answer

Bonjour,

Ce code compte le nombre de fois que le mot Jean est &#233;crit dans la feuille1 du classeur en cours.



Sub Test()

Dim CompterCellules As Integer

  Dim iCell

  

  Application.ScreenUpdating = False

  For Each iCell In Range("A1:D2000")

    If iCell.Value = "Jean" Then

   

    CompterCellules = CompterCellules + 1

    End If

  Next iCell

  MsgBox "Il y a " & CompterCellules & " fois le mot Jean"

  

End Sub



Pour faire une recherche dans d'autres fichier.xls, tu dois les ouvrir,
je ne pense pas que l'on puisse faire une rechercher dans un ficher
ferm&#233;.



jpleroisse



si une r&#233;ponse vous convient, cliquez R&#233;ponse Accept&#233;e.

Compteur sur plusieurs fichier et plusieurs onglets

1 réponse

Discussions similaires