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 67,8% France
Chine 7,8% Chine
États-Unis d'Amérique 4,8% États-Unis d'Amérique

Total:

178

Pays
018532578
Aujourd'hui: 75
Hier: 379
Cette semaine: 2.582
Semaine dernière: 2.729
Ce mois: 1.522