CHANGER LA COULEUR D'UN MOT EN PARTICULIER
mémère
-
23 mars 2001 à 08:28
jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 - 23 nov. 2007 à 08:40
jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 - 23 nov. 2007 à 08:40
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/786-changer-la-couleur-d-un-mot-en-particulier
https://codes-sources.commentcamarche.net/source/786-changer-la-couleur-d-un-mot-en-particulier
23 nov. 2007 à 08:40
Je sais que cela fait longtemps que ce code est là...
Une petite amélioration possible serait de typer les variables et non pas seulement 2
Dim LfoundPos As Long
Dim LfindLenght As Long
Dim LorigSelStart As Long
Dim LorigSelLenght As Long
Dim ImatchCount As Integer
De plus si tu sais ce que retourne la fonction, type le aussi plutot que de mettre du Variant.
Private Function HLW(rtb As RichTextBox, sFindString As String, Lcolor As Long) As Integer
Voila.
Sinon à part cela, il semble que ce soit ce que je cherchais.
Alors Merci.
14 mars 2003 à 10:34
Private Function HLW(rtb As RichTextBox, sFindString As String, Lcolor
ça me dit que j'ai un type non défini par l'utilisateur.
Qqn peut m'aider ?
24 mars 2002 à 14:30
Ouais. mais je te conseille de remplacer Private par Public sion t'auras du mal a l'utiliser
********************************************************************
3 juil. 2001 à 11:14
19 mai 2001 à 02:21
23 avril 2001 à 14:55
merci
31 mars 2001 à 16:56