Bonjour,
Je vous contacte pour vous poser une question à propos le langage de programmation VBA dont je suis débutante, j'ai besoin de programmer une macro qui cherche les mots dans un fichier microsoft word tout en spécifiant la couleur, la taille et le mot à chercher,
j'ai commencer à faire le programme qui compte le nombre d’occurrence d'un mot mais je suis pas arrivée à spécifier la couleur et la taille,
voilà mon programme qui marche et qui m'affiche le nombre d'occurrence de ce mot correctement:
*******************************************************
***********************************************************************
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24 Sub Nombre_Occurrence() 'Déclaraction des variables Dim WordApp As Word.Application Dim WordDoc As Word.Document Dim Cible As Paragraph ' Ouvrir le fichier word en question Set WordApp = New Word.Application WordApp.Visible = True Set WordDoc = WordApp.Documents.Open(ThisWorkbook.Path & "\test.doc") WordDoc.Bookmarks("\StartOfDoc").Select 'Chercher le mot "[OFQDC_" et incrémenter un compteur With WordDoc.Content.Find Do While (.Execute(FindText:="[OFQDC_") = True) count = count + 1 Loop End With MsgBox " le nombre des exigences est : " & count End Sub
Pourriez vous m'aider pour ajouter ces spécifications ( couleur et taille) à ma recherche dans le document ?
Je vous remercie infiniment d'avance,
Bonne journée,
Cordialement
Partager