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 71,3% France
Canada 5,1% Canada
Chine 4,6% Chine

Total:

162

Pays
018484155
Aujourd'hui: 333
Hier: 408
Cette semaine: 741
Semaine dernière: 2.424
Ce mois: 9.667