RelectureOrthographeSynthaxePonctuation
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Le Deal du moment : -23%
(Black Friday) Apple watch Apple SE GPS 44mm ...
Voir le deal
199 €

[VBA Macro Word] tous les caractères possibles avec la fonction Chr

Aller en bas

[VBA Macro Word] tous les caractères possibles avec la fonction Chr Empty [VBA Macro Word] tous les caractères possibles avec la fonction Chr

Message par Admin Mer 4 Nov - 9:13

en élaboration [Vous devez être inscrit et connecté pour voir ce lien]

la fonction peut être placée dans un champ recherche, en supprimant les guillemets la contenant.
pour l'intégrer dans un champ , il faut procéder en 2 étapes.

pour un Chr() dans un champ .Replacement :
on inventera une suite de caractères improbable quelconque : ### ou rfhkkz ou n'importe quoi, qui apparaitra furtivement.

1/ procéder au RR voulu en utilisant la suite improbable pour le caractère inséré
With Selection.Find
       .Text = "(\))(»)"
       .Replacement.Text = "\1###\2"
End With

2/ puis remplacer la suite improbable par le caractère voulu, généré par la fonction Chr()
Selection.Find
       .Text = "###"
       .Replacement.Text = ChrW(8239)
     End With
 
pour un Chr() dans un champ ..Text :
' remplacer le caractère recherché
With Selection.Find
       .Text = ChrW(8239)   ' pas de guillemets, c'est une fonction vba.
       .Replacement.Text = "###"
End With
' puis :
Selection.Find
       .Text = " [faire recherche souhaitée, où le caractère spécial est app "###"]"
       .Replacement.Text = résultat souhaité
     End With

' puis rétablir le caractère (ou supprimer) à étudier
Selection.Find
       .Text = "###"
       .Replacement.Text = ChrW(8239)
     End With

Admin
Admin

Messages : 207
Date d'inscription : 25/09/2020

https://reglesderelecture.forumactif.com

Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum