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 72,5% France
Canada 5,5% Canada
Belgique 3,7% Belgique

Total:

151

Pays
018441550
Aujourd'hui: 12
Hier: 201
Cette semaine: 1.398
Semaine dernière: 1.781
Ce mois: 213