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 69,9% France
Chine 6,3% Chine
Canada 4,8% Canada

Total:

166

Pays
018515167
Aujourd'hui: 331
Hier: 321
Cette semaine: 652
Semaine dernière: 2.081
Ce mois: 7.125