Recherche

 

Public Sub ChercheEtStockeLeSignetToto()
Dim MaVariable As String, MonSignet As String
MonSignet = "toto"
If ActiveDocument.Bookmarks.Exists(MonSignet) Then
MaVariable = ActiveDocument.Bookmarks(MonSignet).Range.Text
End If
End Sub

Statistiques

France 65,7% France
Chine 8,2% Chine
États-Unis d'Amérique 6,9% États-Unis d'Amérique

Total:

180

Pays
018552972
Aujourd'hui: 1.170
Hier: 1.722
Cette semaine: 3.291
Semaine dernière: 2.097
Ce mois: 9.221