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 68,6% France
Chine 7,4% Chine
Canada 4,7% Canada

Total:

169

Pays
018526228
Aujourd'hui: 284
Hier: 456
Cette semaine: 1.577
Semaine dernière: 2.580
Ce mois: 7.599