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,0% France
Chine 7,2% Chine
Canada 4,7% Canada

Total:

168

Pays
018522845
Aujourd'hui: 335
Hier: 439
Cette semaine: 774
Semaine dernière: 2.798
Ce mois: 4.216